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COMMODORE 64 




"BLACKWYCHE" recommended retail price $9.95 inc VAT. 
Available from W.H.SMITHS, BOOTS, J.MEINZIES, WOOLWORTHS 
and all good software retail outlets. Also available from 
ULTIMATE PLAY THE GAME, The Green, Ashbyde-la-Zouch, Leicestershire LE6 5JU 

(P8fP are included) Tel: 0530 41 1485 




« OUT OF YOUR COCKPfT WINDOW 
AS iOUSWOOPDOWN TO TAKE 
OUT SOME TANKS 



ENEMY PLANES ATTACK > 
SUDDENLY WfTH DEADLY 
FORCE 




THE ACTION-PACKED COMBAT SIMULATION 

SKYFOX' is the most realistic awe-inspiring combat simulation you've 
ever seen on your computer. 'SKYFOX' special features include — 

► AIR TO AIR & AIR TO GROUND COMBAT 

► 3D SCROLLING FLIGHT SIMULATION 

► 15 SCENARIOS (from training mission to massive invasion) 

► 5 SKILL LEVELS (from cadet to ace of the base) 

► AUTO PILOT FEATURE FOR LAUNCH & ENEMY SEARCHES 

► ONBOARD & BASE TACTICAL-COMBAT COMPUTERS 

► CONTINUOUS LASER CANNONS 

► HEAT-SEEKING & GUIDED MISSILES 

► JOYSTICK & KEYBOARD CONTROLS 



SKYFOX" NOW • GET "SKYFOX" NOW • GET "SKYFOX 

Available for the Apple II, ll+,llc. He, &Commodore 64/128 on Disk, and NOW CBM 64 Cassette. 



A variable from all good software retailers — if its not there, please order it -or in case of 

difficulty send your crossed cheque'PO made out to Ariotasoft U.K. Ltd., including your own 

and address, in Ariotasoft U.K. Ltd., Suite I0SH0S. Asphafte House. Palace Street, London SWlSi 

i SKYFOX -Commodore Cassette £9.95. Disk£12.9S SKYFOX -Apple Disk £17.05 
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Gel the best of both worlds in our article on 
machine code and Basic. 
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DISK ORDERLY 78 

Keep better track of your files with this little 
utility. 
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Xhe^S have any phonal 
experience or not. 



Marketing, Suite U ■ " , London 



The 8th, 

Personal 



Computer 

Show 

4-8 SEPTEMBER 1985 

OLYMPIA, LONDON 

Sponsored by Personal Computer World 



THE PERSONAL COMPUTER WORLD 
Show is ihe venue for the preview of 
Beyond's latest title - Superman. The 
official launch date is set for October and 
the game will be available on the C64 on 
both cassette and disk. 

Beyond's managing director. Bill 
Delaney, is very confident that the game 
will be a resounding success. He said: 
"The game has appeal for everyone - easy 
to understand with plenty of action and 
interest lor the most avid games fan." 



equipment for their school. 

The final was hosted by Michael Rodd 
- a long standing TV quizmaster. It took 
place at the University of Reading and Dr 
Ewan Page, the vice-chancellor, who is 
also President of the BCS, presented the 
Momentum Award to Chris Purvis and 
Dermot Wilson who received the highest 
scores of the day. 

Team members also received 
individual prizes of a voucher for a free 
week in Camp Beaumont on a computer 
course. 

Over 400 schools entered and 
Commodore's Computers in Schools 
scheme loaned 600 computers to 
educational establishments for the Quiz. 
The schools now have the chance to buy 
the equipment at half price. 



THE BCS/COMMODORE SCHOOLS 
Computer Quiz has been won by Warwick 
School. The members of the winning 
team were Greg Michael, Chris Purvis and 
Tom Duffy. They beat a team from 
Woodchurch High School and received 
the first prize of £1600-worth of computer 
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News 



HODDER AND STOUGHTON SOFT- 
ware has now brought an aspect of horror 
to your computer screen with a new 
adaptation of James Herbert's best selling 
novel, The Rats. 

Blood thirsty rats are roaming the 
streets of London and you are the person 
unfortunate enough to have been picked 
to save the world - again. From your 
control centre you deploy your forces to 
combat the menace and then you must 
venture abroad so you can assess the 
situation first hand. This section of the 
game leads you through the streets of 
London, along the banks of canals and 
into derelict areas. 

According to the makers, the game is a 
combination of strategy and adventure. 
The adventure section contains animated 
graphics. 

Available now on the C64 it costs £7.95. 
Contact: Hodder and Stoughton 
Software, PO Box 702, Dunton Green, 
Sevenoaks, Kent TN13 2YD. 
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Evesham, Worcs WR11 4RY. 



Showing off 



THERE'S A HUGE VARIETY OF MICRO 
paraphenalia on display at the Personal 
Computer World Show, this year. The 
show is at London's Olympia and open lo 
the public Friday 6 to Sunday 8 
September. 

Exhibitors include many big names 
from the computing world including 
Amstrad, Atari, Acorn and of course 
Commodore. And there will also be all 
the latest software on show. 

The show occupies two major halls at 
the exhibition centre and is the biggest so 
far. All aspects of the computer industry 
are being covered from home to business, 
industry to education. 

A special attraction is Tomorrow's 
Micro Home which will incorporate all 
the latest technology in a domestic 
setting: there's TV, hi-fi, video and 
computer linked video-disk plus 
examples of uses for computers in work 
and leisure. 

There's also a special educational 
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of 



E 



section which illustrates 
computers in this area. 

For those who find themselves spoilt 
for choice when buying a computer there 
is a team from the NCC Microsystems 
Centre and members will be giving help 
and advice plus daily seminars on buying a 
computer for business use. 

Major software exhibitors include 
Activision, Mirrorsoft, Martech and 
Mikro-Gen and at the Commodore stand 
you'll get another chance to have a look at 
Commodore's new 128. 

The show is open from 10am to 7pm 
except Sunday when it closes at 5pm. 
Admission is £2 and tickets are available in 
advance from: PCWShow,11 Manchester 
Square, London W1M SAB. 

There will also be an Argus Specialist 
Publications stand at the Show which will 
display Argus' wide range of computing 
publications covering most aspects of the 
home micro scene. 

Come along and see us and have a 
browse. 
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Ultimate has a new game for the C64 
entitled Blackwyche. 

The arcade game continues the 
adventures of Sir Arthur Pendragon in an 
ocean going quest in which he must find 



Eyes down 



the Crystal Skull of Souls on an island 
shaped like a skull. 

The game will retail at £9.95 and 
Ultimate's address is The Green, Ashby 
de la Zouch, Leics LE6 5)U. 




CRL, A FIRM ALREADY WELL KNOWN 
for its software, has now moved into the 
peripherals market with the launch of the 
Video Digitiser Module for the C64. 

The unit allows video signals to be 
displayed on the screen, stored to disk 
and printed out. 

The Austrian designed Digitiser is 
compatible with a normal video camera, 
video surveillance camera, video 
recorder, video-out on a TV or the output 
from a weather satellite receiver which is 
video compatible. 

The product displays an image on the 
screen and the user can pan, with the aid 



of the cursor keys, to view the whole 
picture. Initially in four shades of grey, 
colours can be incorporated using the 
function keys. Using a lightpen, sections 
of the picture can be isolated and used 
later as user defined graphics. 

The Digitiser retails at £149.95 and CRL 
claims it brings sophistication and ease of 
use, previously out of reach of the home 
computer owner. 



Contact: CRL, CRL Hse, 9 Kings Yard, 
Carpenter's Rd, London E15 2HD. 





From bikes to boxing 



ACTIVISION HAS PRODUCED A COM- 
prehensive range of games for the 
autumn varying from a simulation of the 
Tour de France to the discovery of a tiny 
being living inside your 64. 

The company has signed up world 
champion boxer, Barry McGuigan, to 
endorse its new boxing game. Released at 
the end of August, Activision claims that 
the game "incorporates his fighting style 
and unique skills right into the 
gameplay." 

The Great American Cross Country 
Race is a driving simulation which takes 
you on a coast to coast tripacross the USA. 
Terrain, time of day, weather reports and 
distance must all be taken into account so 
there's plenty to think about. You must 
also watch your fuel and look out for 
police speed traps. 

Somebody's in My Computer is a 
totally new idea in games. According to 
Activision, a little known fact is that there 
is a tiny person living inside every 
computer. Activision now has the 
technology to enable you to see and make 
contact with this little friend. You can tell 
him to do things, take care of him or just 
watch as he goes about his business. And 
no two are the same. 

Get on your bike and take part in the 
Tour de France, the official version of the 
great French push-bike marathon. The 




game relies on joystick dexterity to pedal, 
steer, brake and change gear around the 
16 stage circuit. And if you think all sounds 
too down to earth for you then one of 
Activision's other offerings may be your 
cup of tea. Rescue on Fractulus is a space 
pilot simulation which lands you with the 
difficult task of saving your fellow pilots 
who have been stranded on the hostile 
planet, Fractulus. 



For utility enthusiasts, Activision is 
offering the chance to design your own 
games the easy way with Camemaker. 
Designed by Garry Kitchen, the makers 
claim that it can help would-be 
programmers to create almost any game 
imaginable. 

All the new titles are £9.99 on cassette 
and £14.99 on disk except Game Maker 
which is £14.99 and £19.99 respectively. 



A similar product, recently released, 
is Computereyes from Stem Computing 
in Dundee. 

Computereyes is a video acquisition 
for the C64 and enables images to be 
captured on screen and then dumped to a 
printer. 

It connects the video source to the 64 
via the User I/O Port and a grey scale 
picture appears on the screen in about six 
seconds. 

Software is provided which includes 
machine language image capture 
routines, a menu-driven executive and 
image packaging routines. 

According to Stem Computing, there 
are numerous uses for the product: 
pattern recognition, security, spatial 
measurement and education. 



Computereyes costs£139. A demo disk 
is available for £10 and a source code disk 
for £40. Stem Computing can be 
contacted at 3 Blackness Avenue, Dundee 
DD2 1ER. 
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William Wobbler is the latest 



[Tony Crow ther creation from 



Wizard Development. Jayne 



Coin has been delving into its 



secrets for your 



enlightenment. 
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THE QUALITY OF C64 GAMES HAS IM- 
proved in sophistication over the past 
year, mainly as a result of the American 
invasion of the British market. Now our 
own software houses are fighting back. 

William Wobbler by Wizard 
Development's Tony Crowther illu- 
strates this upward curve by exhibiting 
not only graphical complexity but also a 
well planned gaming system. 

The hero of this new action adventure 
is an odd looking, slinking character who 
shuffles across the screen in search of 
small pieces of a larger puzzle, the 
solution of which carries a prize worth 
£1000. The only way to find out what the 
prize will be is to buy the game and solve 
the puzzle because the pieces form a 
picture of the prize. 

William's world is a labyrinth of 
tunnels and passages which are entered 
by jumping down hollowed out tree- 
stumps. There are 10 stumps in all laid out 
across the length of almost as many 
screens. As William walks his head 
wobbles up and down and although he 
can duck under flying frogs and falling 
rocks his head has a nasty habit of 
wobbling back up quite quickly so timing 
is vital. 

On entering a hole at the beginning of 
the game the way is often blocked by a 
droid which can only be destroyed by the 
glowing orb hidden in the only droidless 
hole in the game. The pathway to the orb 



is punctuated with small pools of water 
and stepping stones which William must 
jump if he is to succeed. Touching the 
water literally makes him fall to piecesand 
as if that wasn't enough, there are falling 
rocks to be ducked. 

The only way to enter another hole 
after negotiating your way back from the 
orb's hiding place is to jump down an exit 
hole to the lower passageway which is 
inhabited by flying frogs and snakes 
which mean instant disintegration for 
William if he's not careful. At the end of 
this passage is a rope to climb but players 
will also see a signpost marked 'Save 
Game'. Following along in the direction 
of the sign brings William to a disk drive 
which allows you to save your position to 
tape but first you must find the disk which 
operates the drive. Nothing is easy in this 
game. 

On reaching the surface again, 
William has to get down another tree- 
stump without being hit in the back of the 
neck by a pesky bluebird or by being 
clobbered by the club carried by his irate 
mother-in-law. 

When William needs any object which 
he has collected, it appears automatically, 
demonstrating whether or not the thing 
you are facing is dangerous or not. Or 
does this mean the object has to be picked 
up? 

This is the major difficulty because you 
only get one life per game and a fatal 



choice means the loss of all your objects 
and a restart to the game, unless you have 
found the disk which does not appear 
until you have ventured well into the 
maze. There is also an object in one of the 
caves which will make you drop 
everything, you are carrying and replaces 
them where they were originally. 

One of the problems to be overcome 
would make Indiana Jones cringe. A 
gigantic red ball rolls towards William, 
totally blocking the tunnel. There is a way 
to pass this point but I'm not allowed to 
divulge the secret, however I will say that 
there is a key object hidden on the other 
side of the ball. 

Some of the tunnels end in doorways 
which are always locked and frequently 
booby trapped. The trap could be on the 
outside or the inside and the keys are 
hidden elsewhere in the labyrinth. For 
example, one key hangs from the roof of a 
cave. To reach it William must have a 
piece of pipe but its retrieval blocks off 
the only exit. To escape he must shoot at a 
target but this implies the ownership of a 
gun. No gun, no chance. 

Scattered liberally through the caves 
are the clues for the competition and a 
tally is kept of the number found on a 
wobbly scrolling scoreboard at the 
bottom of the screen. 

This game makes full use of the 64 and 
it is rumoured that their are only a handful 
of bytes left unused in this mega- 
adventure which will become an essential 
addition to any gameplayer's library. 
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A whole new world awaits you and your 64. The world of 
Prestel, Micronet, Viewfax. Homelink. Cftiservice. Compunet 
(Commodore's own database) etc. This is the world of product 
reviews, mainframe games, home banking, business information, 
commodity futures, armchair shopping, real time conversation, 
electronic notice boards, helpful tips, ICPUG, news, Telex-Link, 
Mailbox, Chadine, Gallery etc. This is the world of telesoftware, with 
programmes to download into your 64 and save to disk or tape. 
Many telesoftware programmes are provided free of charge or at 
nominal cost 

Dialog with over 600 massive databases on call and almost 
unlimited information on just about any subject is accessible from 
your 64, together with BT Gold, Easylink, One to One etc., with 
electronic mail, business services and telex facilities. 

You can link to Bulletin Boards in your area for local news, club 
news, letters, jokes, poems, helpful tips, etc. It's a whole new 
experience. 

Take the first step. Make a giant leap for your 64. Communicate 
with Modem House and you'll soon be talking to other '64 users, 
linking to other micros and swapping files, tips, programmes or just 
chatting. 

Modem House are the largest suppliers of Commodore 
communication equipment We also supply complete systems for the 
Pet 2000. 3000, 4000 and 8000 series. 




mm 

HOUSE 




The most popular 64 micropack in use today, will link you to 
Prestel. Micronet 800, Viewfax 258, Homelink, Farmlink. Cibservice. 
Compunet etc. From Modem House, the complete system is on offer 
at the incredible price of £99.95 inc. VAT, p & p. 

Optional terminal software to link you to BT Gold, Easylink, 
One to One, Dialog and Bulletin Boards is available at £29.95 inc 
VAT, p & p. 

Complete Commodore 64 micropack 



£99.95 



special price fc7 /i /J inc. VAT p & p 
for a limited period only. 

Special, special offer, order your 64 micropack now and 
get a FREE quarter's subscription to Micronet 800 and Viewfax 258 
(Prestel Microcomputing J. 

Modem House, lolanthe Dnve, Exeter. Devon EX4 9EA Tel: |0392) 69295 

| Please send me Commodore 64 Micropaek|s) £99.95 each 

Optional Terminal Software £29.95 

I I enclose £ /Bill my Access No , 



Name ........ — 

Address 



lolanthe Drive, Exeter. Devon EX4 9EA Tel: (0392) 69295 



Telephone No. - . 

Please allow 28 day delivery 

This offer applies only while stocks last 



YC 10/85 





GREETINGS, ACTION FANS! WE BOUNCE 
back this month with some fabulous tips 
and tricks (or your own arcade games 
programs, plus a gander at some o( the 
latest offerings to hit the shops, and 
strategies for some new games. 

Poke in the eye dept. 

Here are some interesting POKEs for you 
to use in your games programs, to clobber 
the chances of any unscrupulous person, 
i.e. me, from cracking your game and 
stealing it. 



POKE 


Function 


775,191 


disables LIST 


775,167 


enables LIST 


819,246 


disables SAVE 


819,245 


enables SAVE 


816,157 


disables LOAD 


816.165 


enables LOAD 


808,239 


disables RUN/STOP 


B08,237 


enables RUN/STOP 


792,193 


disables RESTORE 


792,71 


enables RESTORE 


646,x 


changes character colour, 




where x=any No. from 0-7 


2235 


removes all the lines No.s in a 




Basic program. 


22,25 


puts them all back 



{You could just as easily put these into an 
Assembly Language program as you could 
in a Basic one. J 

Transatlantic Preview 

Tracfc and Field (Konami/ Atari) is the best 
sports game I've played since Daley 
Thompson first threw a javelin. This is a 
conversion from the real arcade machine 
which started the whole sports game 
fetish in the first place. You can play 
against the computer or a real opponent, 
with a split screen depicting each player's 
progress, a lot like Pitstop II. 



I've been playing Bounty Bob Strikes Back 
(Big Five/US Gold) lately, and I have 
achieved a certain competence; that is to 
say I breached the elusive 30,000 score, 
which to my mind constitutes a 
reasonable score on most games (good 
rule of thumb, that). My current hi-score 
is 46,880, and I got to Bob's Playroom as 
well (Level 4, I think!).- 

I like this game for several reasons. It 
plays well, the music is entertaining and 
not in the least irritating, and it has the 
most amusing hi-score table I've ever 
seen. The sort routine to enable the little 
birds to pick up the letters and place them 
in the table is an awesome piece of 
programming, and that is before you even 
get to the game. A lot of games claim 
"arcade quality", but Bounty Bob has it. 
I'd happily push my 10 pences into this 
one. 

Let's do the time warp again II 

I keep mentioning the Rocky Horror 
Show, as I've had the Spectrum 
(arrrrghhhh! Pass the Crucifix!) version 
for some time. All my observations on the 
game had until now been based on this 
altogether inferior version. I can report 
with pleasure that the new C64 version is 
better! It's more difficult to complete, 
the music is what a friend of mine would 
call fazz (good), and the sound effects are 
more than appropriate. BUT (and as you 
can see, that's a big but) the sprites let it all 
down a bit. I've seen multicoloured 
sprites that would knock yer eyes off, but 
these are chunky to say the least, and 
more multicoloured lo-res to say the 
most. Otherwise a super game and 
certainly well worth a bash. 

Hot tips 

Bounty Bob: The way the joystick controls 
Bob can be very precise. To jump onto a 
close platform push the fire button and 
just nudge the joystick in the desired 
direction on his way down. Ignore the 
mutants and only kill them if they're 
getting in your way. Highest scoring 
settings: difficulty on medium, bonus at 
10,000, and lives four. 

Strangeloop: Tricky this one. Best 
advice I can give you is to blast all the 
swarf in every room before you move on, 
to make sure it can't multiply again. 

Rock'N'Bolt: Make good use of the 
Practise Mode (unlimited lives) to suss 



the levels out before you begin a game. 

Better luck next time dept. 

Pastfinder (Activision) promised to be 
a really good game. The graphics ain't bad 
and the sound is fairly good.. .but it's so 
flippin' boring! Who cares whether you 
make it to the top of the screen or not? 
Activision should really make the senarios 
more entertaining, as I really couldn't 
bear to play this game for more than 10 
minutes before I reset and loaded Bounty 
Bob again. Try it out in the shop before 
you buy it, and see what you think. 

Breakdance (EPYX/CBS) should be 
very good, but I couldn't shake the feeling 
of playing a sort of breakdancing space 
invaders, and paying a lot of spons for t he 
privile&e! Technically a very good 
program, but largely uninteresting and, I 
suspect, just a piece of bandwagon 
hopping. Epyx doesn't need to do this. It's 
a good enough company to make much 
more original games, without this kind of 
cheap shot. 

Ooops! my mistake dept. 

My profuse apologies to English Software. 
Last month I featured Henry's House in 
my Transatlantic Preview spot. I was 
misinformed as they are actually a bunch 
of Mancunian lads, revealing a trap I for 
one always fall into; just because a piece 
of software has superb state-of-the-art 
graphics doesn't mean that the said piece 
of software comes from across the 
Atlantic. There is a great deal of World 
Leading programming talent on this little 
island (lots that we don't know about yet 
too!) and I promise I won't forget that 
from now on. (Take 100 lines, Flippo -Ed.) 

I reiterate my appraisal of last month: 
Henry's House is a very good game. 
Support your local programmers, 

Mailroom Special Message 

Send in your hints, tips, cheats, bugs and 
hi-scores to Flippo, c/o Your 
Commodore, Argus Specialist 
Publications No. 1 Golden Square, 
London W1R 3AB, and see your name in 
print. 



Listings will be much easier to 
enter with our new system. 



COMMODORE LISTINGS ARE RATHER 
well known for the horrible little black 
blobs that always abound. Unfortunately 
the graphics characters which are used to 
represent graphic and control characters 
do not reproduce very well and they are 
also difficult to find on the Commodore 
keyboard. 

for this reason Your Commodore 
started to precede any control characters 
with a REM statement on the previous line 
that explained exactly what the black 
blobs were meant to be. Unfortunately 
the graphics characters were not 
documented and these still cause some 
confusion. For this reason we are starting 
to use a new method for marking the 
control and graphic characters in our 
listings. 

In future all control and graphics 
commands will be replaced by mnemonic 
within square brackets. This mnemonic is 
not typed out as printed in the magazine 
but rather the corresponding key or keys 
on the keyboard are pressed. For example 
[RIGHT] means press the cursor right key, 
you do not type in [RIGHT]. All of the 
keywords, what keys to press and how 
they are shown on the screen are shown 
below. 




LISTINGS 



Any character that is accessed by pressing 
shift and letter will be printed as [s 
LETTER] 

[s A| S hift and A 

[s C] shift & C 

Any character that is accessed by pressing 
the Commodore key and a letter will be 
printed as [c LETTER) 
t c A] Commodore & A 

[c C] Commodore & C 



I c 1| Commodore & 1 

Any control key will be printed out as a 
number. For example (001 J. Control 
codes are accessed by pressing the CTRL 
and a letter at the same time [001] is CTRL 
& A, 002 is CTRL & B etc. See the manual 
for more information about control 
codes. 

[001] CTRL & A 

[026] CTRL & Z 



Mnemonic Symbol what to press 



[RIGHT] 

[LEFT] 

|UP] 

DOWN] 

F1] 
[F2] 
!F3] 

M 




left/righ 



shift left/righ 







Shift & up 
/down 



up/down 



Fl 



shift & f! 



f3 



shift & f3 



Mnemonic Symbol what to press 



[FS] 



[F6] 



F7] 



FBI 




CLEAR] 



HOME] 



RVSON] 



[RVSOFF] 





ri 

shift & f5 
ft 

shift & fH 

shift & CLR 
/HOME 

CLR/HOME 
CTRL & 9 
CTRL & 0 



Mnemonic Symbol what to press 



[BLACK] 

[WHITE] 

(RED] 

CYAN] 

PURPLE] 

GREEN] 

BLUE] 

YELLOW] 





CTRL & 1 



CTRL & 2 



CTRL & 3 



CTRL & 4 



CTRL & 5 



CTRL & 6 



CTRL & 7 



CTRL & 8 





YES.. ..place an order for our Commodore 64 Magazine and we will send you one of the 
above games absolutely free. We will also enrol you in our Discount Software Club 
enabling you to purchase software at huge savings over shop prices. We offer all the 
latest titles at substantial discounts such as, Frank Bruno's Boxing at £3.95 (saving 
£3.00), Frankie Goes To Hollywood at £6.95 (saving another £3.00) or Spy Versus 
Spy at £6.95 (saving yet another £3.00). We also have a number of older titles at even 
bigger discounts, such as, Attack of the Mutant Camels at £2.95, Chinese Juggler 
at £1.95, Scuba Dive at £2.95 etc. In all we have over 200 titles available for your 
computer. 



I IIW. toftUMW 



RIOT! 

J 



SIX MAGAZINES A YEAR 

A subscription of just £5.00 will 
bring you six magazines a year 
through the post. Each magazine is 
packed with reviews of all the latest 
software, reader's games playing 
tips, competitions to enter, our 
reviewer's personal choices and a 
summary of how the other 
magazines rate the new releases. 
HARDWARE AND UTILITIES 
SUPPLEMENT 
Every new subscriber to the 
magazine gets a 32-page review of 
some of the more popular utilities 
— such as word processing soft- 
ware — and hardware including 
joysticks. 



HOTLINE KEEPS YOU UP TO 
DATE 

Subscribers to the magazine can 
phone our 24 hour Hotline for up to 
the minute news of the latest 
releases. A three minute recording, 
updated weekly, details the new 
titles and their prices. Club members 
may order by phone too! 

EASY ORDERING 

You can order from our substantial 
range as and when you like. There 
are no minimum order requirements 
— you don't have to buy anything 
at all. When you do order we do 
our best to despatch your goods 
within a week — often quicker. 



SUBSCRIPTION FORM YC 10/85 



I wish 10 become a subscnber lo the Mr Software: 

1 j Commodore Magazine 

lor the ne«t 12 months. for which I enclose E5" I understand vou wit) send me your most recent Ckib Magazine 
by return and that if I'm not completely satisfied within two weeks I can return the game & magazine (or 
a refund. I would like as my FREE game:- 

n Finders Keepers I J Kik Start 

Name I BLOCK CAPS) ..i.i - ...„. .,....„ i. . i 

Address . — ... — <-i---r»»".-i •>■■•< >■><■■ - -•..-•-.■.-..■•<... ■ ■ 

— - • - 

Postcode. . Cheque/Postal Order No 

Or charge my Access'Visa account 

□□□□□□□□□□□□□□□□□ 

If5- applies to UK 6 BFPO only Othei rates are 17 Europe, 0 USA & Middle East, f 12 Australia. Far East 
& S. Africa.) 



DON'T TAKE OUR WORD 

Here's what somme of our subscribers 
say 

"Many congratulations on your excellent 

Club, may it prosper greatly." 

Mar* A. P. Colebtook, Tenerife. Canary 

Isles. 

"I think your Ctub ts sensational, terrific 
who else could offer such bargains." 
David Barrows. Northampton. 

tO'w'w' *»rr*n > - «■.■.---■- for «np*ci>nn. I 




KELVIN HOUSE. TOTTERIDGE 
AVENUE. HIGH WYCOMBE. 
HP13 6XG. 10494) 450587 



Maths Part Two 

LAST MONTH WE LOOKED AT HOW THE 
C64 along with some software, can help 
the pre-school child get to grips with basic 
number learning. 

Once this, the most important hurdle, 
is over and the child is al school, the 
computer must take a secondary role in 
his education. This is not because there is 
no suitable software available - quite the 
contrary - but because the child should 
be doing sufficient at school without extra 
work being thrust upon him at home. 
However, if your child is slipping behind 
with his work or if he shows a real 
enthusiasm and wants to do extra, there 
are numerous programs to look at. 

Let's start by lookingatsome programs 
which re-cap the four basics of arithmetic 
- addition, subtraction, multipliction and 
division. There are numerous programs 
which deal with this aspect of number 
work, it is also the easiest to get wrong. 
Some programs are straightforward teach 
and test and can be very dry and boring. 
These can do more harm than good. 
Others use the capabilities of the 64 to 
"create eye-catching graphics which grab 
the child's attention and hold it so the 
child is learning without really being 
aware of it. At any age, more learning is 
done in an atmosphere of fun than by 
having it force fed. Several Publishers 
have recognised this and in consequence 
have produced some fun to play games 
which also teach and/or test. 

5hards Software has a lovely program 
in the Fun fo Learn series. Monger Maths 
is a collection of programs which cover 
size estimation, mental arithmetic, multi- 
plication tables and logic. Each game has a 
different format but is written to give 
maximum fun whilst still helping the user 
to learn. In one game the player feeds in a 
friend's name and then tries to answer 
three questions correctly in a specified 
lime. If the player is successful his friend is 
eaten by a monster, if not he himself is 
eaten. 

Another part of the tape covers multi- 
plication tables - one of the bugbears of 
education. I believe they are an essential 
part of mathematical training. Should 
your child's school be one where theyare 
not taught there are some packages on 
the market to help. 

Collins produces Know Your Tables. 
This is a cassette and booklet set which 
works steadily through tables up to 10. 
The booklet has lots of related exercises 



and shows the user the patterns formed 
by the numbers, 

McGraw-Hill has just released a 
collection called Ladders to Learning. 
Included in this series are cassettes 
dealing with addition, subtraction and 
problem solving. There arc also titles 
dealing with multiplication and division. 
The child is led through the maze of learn- 
ing tables by a cartoon character, Henry 
Hilo, and his friend a number machine. 
Once multiplication is mastered division 
can be tackled, and this time Henry shows 
that if the child can do subtraction and 
multiplication he can divide. 

My overall favourite for learning and 
using basic number rules is Number 
Tumblers by Fisher-Price. This is a 
cartridge based game in which you have 
to bounce a figure around a grid using the 
numbers and operators to make a series of 
totals. The game can be played by 
children and adults alike as the 
parameters can be set to a very simple or 
extremely difficult level. The game can be 
fast and furious and calls for quick 
thinking especially when playing against 
the computer. 

These basic four rules cover many other 
topics: telling the time, using money, 
fractions, decimals and graph work. 
Collins and Good Housekeeping both 
have packages dealing with telling the 
time. Mr T Tells the Time uses the 
computers graphics to create pictures to 
teach the position of the numbers on the 
clock face and the rudiments of telling the 
time. Collins' What's the Time uses a 
cassette and booklet approach to learning 



about the quarter hours, half hours and 
hours. It uses both analogue and digital 
clocks in its examples. 

For a completely different approach 
look at A.S.K.'s Time Trucker. This consists 
of three games in which the player guides 
a truck around a map collecting fruit and 
vegetables and taking it to market. In the 
first game, every time the driver stops to 
collect produce he has to clock in; 
however the clock on the screen is an 
analogue clock and the time has to be 
entered in a digital form. All good fun and 
very educational. 

Fractions, decimals and graph work 
are all covered by the Ladders to Learning 
series. There is also a cassette which 
explains algebra. They follow the same 
formula as the previously mentioned 
Ladders to Learning series. Henri Hilo 
explains simply and logically each subject 
making full use of the graphics 
capabilities of the machine. Test 
questions are set to see if the child is 
understanding everything. 

This sort of program should not be 
used as matter of course at home. If your 
child is having problems at school or 
wants to do extra work, see the class 
teacher involved before deciding to 
purchase anything and then try to have a 
good look at the programs available in 
your local shops. Whatever you do, don't 
force your child. You may put them off 
mathematics and thus defeat the object of 
the exercise. Numbers can be magic and 
your Commodore can help you show 
your child the fun. 

Other Programs to Look Out 
For 

Sprites/Snowmen by Commodore - 
addition and multiplication games. 
Number Puzzler by Commodore - five 
games dealing with the four rules. 
Mathematics by Longmans - '0' level 
revision package. 

Numbers at Work by Collins Brainpower - 
maths education for adults. Covers 
fractions, decimals, square roots and 
V.A.T. and P.A.Y.E. problems. 

Addresses 

Commodore UK, 1 Hunters Way, Corby. 
Northants 

Collins, 8 Grafton St. London W1E 7JZ 
A.S.K., 68 Upper Richmond Rd. London 
SW1 2RP 

Longmans, Fourth Ave, Harlow, Essex 
CM19 5AA 

Good Housekeeping (Eury Software), 
72 Broadwick St, London W1V 2BP 
McGraw-Hill. Shoppenhangers Rd, 
Maidenhead, Berks SL6 2QL, 



STEP INTO THE FUTURE 
WITH "C POWER"- 

the C Language Compiler for the COMMODORE 64 




Your personal guide to "C". 
The world's most effective and 
convenient prog ramming language. 

C POWER is a fully 
implemented, standard C 
Language compiler for tho 
COMMODORE 64 -from PRO- 
LINE SOFTWARE. 

This powerful package comes 

complete with: 

9 A double-sided disc 

• A 53 1 page C Language 
Turoriol, "C Primer Plus"-"o 
friendly, easy-to-use guide to 
learning and using C"- 

• A 44 page user's guide 
complete with listing and 
explanation 

C POWER GIVES YOU 
MORE: 

• Standard editor, Syntax 
checking editor 

• Shell Environment Manager 
0 Linker and Translator 

• Standard System and Math 
Function libraries 

• Lots of Utility Routines 

• Sample programs 

• Luxurious, four-way scrolling 
and cut-and-pcste facilities 

• Value for money at £ 1 1 9.95 

C POWER IS: 

• Royolty Free-anything you 
write on C Power belongs to 
you 

• On-Line-the C Power bulletin 
board system operates 7 days 
a week, 24 hours a day-to 
update your function libraries 
and answer your questions. 

• A fully functioning, 
transportable, compatible C 
Language Compiler for the 
COMMODORE 64. 

THE EXPERTS AGREE: 

"on excellent package... 
deserving to be in anyone's 
software library" 

(John Chen, INPUT, p. 12, 

July 1985) 
"a refreshing change... with the 
speed of machine language and 
the progromability of BASIC" 

(RobKoski,INPUT lP J4, 

July 1985) 



ORDER FORM 

For your C POWER PACKAGE, send this form to 

Pitman Publishing Ltd 
1 28 Long Aero 
London 
WC2E9AN 

Please send me C POWER, price £1 19.95 |incl.VAT) 
ISBN 0 273 02482 5 

I enclose a cheque/postal order (Payable to Pitman 
Publishing) forE 



Alternatively, please debit my 
Account Number 



Signed 

Name (capitals please) 
Address 




Title 

I^The Way of the Exploding 

2 Elite 

3 Soft Aid 
Pitstop II 
Dambusters 
A View to a Kill 
KHcstart 

International Basketball 
International Tennis 

10 Dropzone 

11 Shadowfire 

12 Impossible Mission 

13 Cauldron 

14 Entombed 

15 Graham Gooch's Test 
Cricket 

16 Action Biker 

17 Theatre Europe 

18 Rocky Horror Show 

19 Jet Set Willy II 

20 Bruce Lee 



Melbourne House 
Firebird 
Various 
US Gold 
US Gold 
Do mark 
Mastertronic 
Commodore 
Commodore 
US Gold 
Beyond 
US Gold 
Palace 
Ultimate 
Audiogenic 



MICKEY THE BRICKY 





In the first of a new series, 



Nick Hampshire brings you 



the first pieces of a bigger, 



better Basic. 




HOW MANY TIMES HAVE YOU 
thought how nice it would be to have a 
Basic command to perform a particular 
function? The kind which would normally 
require a convoluted piece of Basic code, 
or a short machine code routine called by 
a SYS command. Adding extra commands 
to Basic on the C64 is not difficult and can 
make writing Basic programs a lot quicker 
and easier. 

There are of course a considerable 
number of commercially produced 
extended Basic packages. But, being able 
to add and create your own commands is 
much more fun and allows the commands 
to be tailored to your particular needs. 

This article is the first of a series which 
will include the code for adding a whole 
range of very useful commands to your 
Basic interpreter. This article includes the 
code for the all-important control wedges 
which allow the new Basic commands to 
work. It is essential that these routines are 
in memory before any attempt is made to 
add command routines. 

The following routines are the start of 
the Basic extension code. These are the 
main control routines which patch the 
extra commands into the C64's Basic. They 
should be used in the order they appear in 
this article and the accompanying listings. 

Initialisation 

This section of code contains the initial- 
isation routines and the table of added 
commands and their vectors. The 
commands are initialised by calling the 
cold start (SFFC2 - 64738) which simulates 
astandard power-up. The routines cannot 
be used with a cartridge in place as they 
take up the same locations and are 
designed to be capable of being placed 
on a cartridge ROM if required. 

The routine labelled 'COLD' is the 
power-up routine and the routine 
labelled 'WRST' is the NMI routine. The 
NMI routine makes sure that the function 
key and lister wedge routines are not 





disabled. Note that the table of added 
commands and their addresses can be 
changed and added to by the user. The 
commands given In the table refer to 
commands which will be added to this 
package later in the series. Any reader 
assembling this portion of the code will 
get a 'Label not present' error from the 
CADDR table unless a dummy routine is 
set up for every added Basic command 
which has not yet been implented. This 
routine simply takes the following form: 

XXXXXX JMP $AF08 

where XXXXXX is the label. Thus, since the 
first two commands are included at the 
end of this article a total of 30 dummy 
routines are required at this stage, which 
can be removed as the appropriate 
commands are added. Such a set of 
dummy routines is shown in the file. LIB 
DUMMY at the end of the listings. 

Crunch to Tokens 

This routine is wedged into the Crunch- 
token link at locations $0304-40305 {772- 
773). Crunch to tokens will take the input 
line and convert all command words to 
one (normal) or two (Extended) byte 
token values. This does exactly the same 
as the original Basic version except that 
the extended keyword table is checked 
before the normal Basic table. 



Crunch to tokens is done directly after 
the warm start routine encounters a 
carriage return. It makes no difference 
whether the command is direct mode or 
for entering or deleting a line in memory. 

Tokens to Text 

This routine is wedged into the Print- 
token link at locations $0306-$0307 (774- 
775). Tokens to text is used in the list 
command only to convert any token value 
(greater than 127 for Basic or preceded by 
SEE - 238 for Extended Basic) back into the 
copmmand word and print it to the 
output device. 

Execute Statement 

This routine is wedged into the Start new 
Basic code link at locations $0308-50309 
{776-777). This is the control part of the 
main Basic interpreter loop and takes a 
token value and executes the routine via 
the vector table in the initialisation. 

There is a special case routine for 
PRINT which uses the same token as in 
normal Basic but the routine has been re- 
written to allow the CTL command. 

Execute Arithmetic 

This routine is wedged into the Arith- 
metic link at locations S030A-030B (778- 



779). This routine is called by Evaluate 
expression and transfers control to one of 
the four arithmetic routines included in 
this package. If the Extended Basic 
command is not one of the four 
arithmetic routines, 'syntax error' is 
output. 

Function keys 

This routine is wedged into the keyboard 
table set-up vector at locations S028F- 
$0290 (655-656). The routine checks if the 
computer is in direct or program mode. If 
in direct, the normal routine is executed, 
if in program mode, the quotes flag is 
checked and if set, the normal routine is 
executed. 

The current key pressed is checked for 
one of the four function keys and the shift 
key. If it is a function key, the text for thai 
key is read from behind the Basic ROM 
and put into the keyboard buffer until all 
eight characters or a zero byte terminator 
is found. If not a function key, the normal 
routine is executed. 

Program Lister 

This routine is wedged into the INPUT 
vector at locations $0324-$0325 (804-805). 
It exactly simulates the normal input 
routine. First the input device is checked 
for keyboard. If not found, the normal 
routine is executed. Direct mode is then 
checked for and if not found, the normal 
routine is again executed. 

The next part of the routine is copied 
directly from the kernal routine except 
that the cursor down key is checked for 
and, if found, then the cursor position is 
checked. If the cursor is not on the 
bottom line of the screen, the cursor 
down character is printed. If the cursor is 
on the bottom line, instead of printing 
cursor down, the next line number is 
found and that line listed (any output 
device). 

NOTE: there is no check for quotes so if 
you're entering a line on the bottom line 
of the screen, the line will be wiped out 
and a line listed if you press the cursor 
down key even from within quotes. 

When the last line of the program is 
listed, the cursor will remain at the end of 
the line, cursor down again will produce 
the message: 

........ ... END OF PROGRAM**""" 

after this, the program will start listing 
from the beginning again. 



Print 

The purpose of this routine is to PRINT 
characters to the open CMD output 
channel (usually value three - screen). 
This version of PRINT does exactly the 




Basic Loader 



1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 

1120 
1130 



REM 
REM 
REM 

REM 
REM 
REM 
REM 
REM 
REM 
REM 



BASIC LOADER FOR EXTENDED 
BASIC COMMAND 
PACKAGE 

COPVRIGHT 1985 
NICK HAMPSHIRE 



* 

* 
* 

* 



PRiNT-'aaawwiw entering extended basic" 

I=327£8 :T=0 
READA : I FA=- 1 THEN 1 1 50 
P0KEI,A-T=T+A 
1140 1=1+1 :GOTO1120 

1150 IFTO203934 THENPR I NT " XWCHECKSUM 
ERROR -" "T "SHOULD BE 203934" 

fif? IFI034518 THEN PR I NT " MSNUMBER OF 
VALUES ERROR :"I"SH0ULD BE 34518" : END 
1170 PRINT"*WVALUES ENTERED CORRECTLV" 
PRINT'VWO RUN PRESS ANV KEV" 
GETfl* = IF A$<>" "THEN1 200 : G0T01 190 
SVSC64738) 

DAT A 122.. 128, 57, 128, 195, 194, 205 
DATA56, 48, 139, 227, 131 , 164, 201 
DATA 129, 158, 130,247, 130,59, 131 
DATA76, 72, 178, 0, 49, 234, 63 
DATA128, 71,254, 74,243, 145,242 

2050 DATA14, 242,80,242,51,243,241 
2060 DATA1 31 , 202, 241 , 237, 246, 62, 241 
DATA47, 243, 68, 123, 165, 244, 237 
DATA245, 32, 188, 246, 32, 225, 255 



1180 
1190 

1200 
2000 
2010 

2020 



2030 
2040 



2070 
2080 
2090 
2100 
2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 
2280 
2290 
2300 



DATA240, 3, 76, 1 14, 254, 32, 163 
DATA253, 32, 24, 229, 32, 93, 128 
DATA32,204,255, 169,0,133, 19 
DATA32, 122, 166,88, 162, 128,76 

DflTA136,227, 162,21, 160, 123, 134 
DATA 195, 132, 196, 160,35, 177, 195 

DATA 153, 16,3, 136, 16,248, 169 
DATA1 18, 168, 131 , 141, 143,2, 140 
DATA 144, 2, 96, 142, 22, 208, 32 
DATA163, 253, 32, 80, 253, 32, 91 
DATA255, 32, 93, 1 28, 83, 32, 229 
DATA 128, 32, 191 , 227, 169, 128, 133 
DATA52, 133,54,133,56, 169,0 
DATA133, 51 , 133, 53, 133, 55, 169 
DA T A 1 72 , 1 68 , 1 28 , 32 , 45 , 228 , 1 62 
DATA251 , 154, 288, 172, 147, 13, 32 
DATA32, 32, 32, 42, 42, 42, 42 
DATA32 i 69 , 88 , 34 , 69 , 78 , 68 
DAT A69 , 68 , 32 , 54 , 52 , 32 , 66 
DATA65, 33, 73,67, 32, 86, 43 
DATA49, 32, 42, 42, 42, 42, 13 
DATA13, 32, 54, 52, 75, 32, 82 



Programming 




Basic Loader 



2319 
2328 
2336 
234Q 
2350 
2360 
2370 
2380 
2390 
2400 
241© 
2420 
2430 
2440 
2450 
2460 
2470 
2480 



DATA65, 77, 32, 83, 89, 83, 84 
DflTfl69 , 77 , 32, 32 , 0 , 1 62 , 1 1 
DAT A 1 39 , 9 , 1 28 , 1 57 , 0 , 3 , 202 
DATA 1 6 , 247 , 96 , 82 , 85 , 206 , 67 
DATA84, 204, 65, 80, 80, 69, 78 
nRTfl 1 96 , 65 , 85 , 84 , 207 , 67 , 65 
DATA84, 65, 76, 79, 199, 67, 72 
DRTR65, 78, 71 , 197, 67, 72, 65 
DATA73, 206, 67, 82, 85, 78, 67 
DRTR200, 68, 69, 76, 69, 84, 197 
DRTR68 , 73 , 83 , 203 , 68 , 79 , 75 
DflTR 1 97, 68, 85, 77, 298, 69, 88 
DRTR69, 195, 79, 73, 78, 196, 71 
DATA69, 212, 75, 69, 21 7, 77, 65 
DRTR212, 77, 69, 82, 71 , 197, 79 
DATA76, 196, 80, 79, 208, 80, 85 
DATA2 1 2 , 82 , 69 , 78 , 85 , 77 , 66 
DRTR69, 218, 82, 69, 80, 69, 65 



2490 DRTR212, 83,79,82,212,84,82 
2500 DATA65, 67, 69, 79, 206, 84, 82 

2510 DRTR65, 67, 69, 79, 70, 198,84 
2520 DflTR89,80,197,85,78,84,73 
2530 DRTR204, 68, 69, 69, 203, 72, 73 
2540 DRTR77, 69, 205, 76, 79, 77, 69 
2550 DRTR205, 86, 65, 82, 80, 84, 210 
2560 DRTR0, 1 16, 134, 138, 133, 119, 134 
2570 DflTfl 122, 134, 125, 134, 128, 134, 131 
2580 DATA 134, 134, 134, 137, 134, 140, 134 
2590 DATA 143, 134, 146, 134, 149, 134, 152 
2600 DATA 134, 155, 134, 158, 134, 161 , 134 
2610 DATA 164, 134, 167, 134, 178, 134, 173 
2628 DflTfl 134, 176, 134, 179, 134, 132, 134 
2630 DflTfl 185, 134, 183, 134, 191, 134, 194 
2640 DATA134, 197, 134,208, 134,283, 134 
2658 DATA286, 134, 166, 122, 160,4, 132 
2660 DflTfll5, 189,0,2, 16,7,281 
2670 DATA255, 240, 43, 232, 208, 244, 201 
2680 DATA32,240, 36,133,8, 291, 34 
2690 DATA240,71,36, 15, 112,26,201 
2700 DATA63, 208, 4, 169, 153,288,18 
2710 DATA201,48, 144,4,201,60, 144 
2728 DATA10, 76, 70, 130,169,238,44 
2738 DATA5, 1 1 , 164, 113, 232, 200, 153 
2740 DflTfl251, 1,201,238,248,49, 185 
2750 DATA251 , 1 , 240, 34, 56, 233, 58 
2768 DATA240,4,201, 73, 208,2, 133 
2770 DflTfl 1 5 , 56 , 233 , 85 , 208 , 1 74 , 1 33 
2780 DflTfl8, 189,8,2,240,219,197 
2790 DATA8, 240, 215, 208, 153,251,1 
2800 DAT A232 , 208 ,240,1 53 , 253 , 1 , 1 98 
2818 DATA 123 > 169,255, 133, 122,96, 165 
2828 DATA1 1,200, 153,251, 1,76,207 
2838 DATA 129, 132, 1 13, 160,255, 134, 122 
2840 DATA202 , 1 69 , 1 , 1 33 , 1 1 , 200 , 232 
2856 DATA139,0,2,56,249,241,123 



same as the Basic PRINT except that a 
check has been made for the CTL 
command to be included. The syntax for 
this modified command is exactly the 
same as that of the Basic PRINT command. 

The First Extended Basic 
Command 

CTL 

Abbreviated entry: C(shift)T 
Affected Basic abbreviation: none 
Token: Hex $EE,$02 Decimal 238,2 
Modes: Direct, program, and in PRINT 
statements 

Purpose: To replace cursor and colour 
characters, screen and border pokes, thus 
improving the ability to position the 
cursor anywhere on the screen. If the 
value is not specified, the current value is 
used. 

Syntax: CH «x](M4cc][,[sc][,[bc][,[cls 
]]]]]]) 

Where x is the column position of the 
cursor (0-39), y is the row position of the 
cursor (0-24), cc is the cursor colour, sc the 
screen colour, be is the border colour (0- 
15), and els is a flag for clearing the screen 
(0 - no, 2 - yes). 

Erros: Syntax error - if the syntax is not as 
above. 

Illegal quantity - if the valuesare out of 
range. 

Use: CTL is a powerful screen handling 
routine. Cursor, screen, and border 
colours can be set with a number (0-15), 
and the cursor can be positioned 
anywhere on the screen by entering the x 
position (0-39). There is also a screen clear 
flag that, if set to 'V, will clear the screen 
before positioning the cursor. To make it 
easier to describe, here are a few 
examples and what they do. 
CTL (20) positions cursor at middle of 
current line 

CTL (0,0) moves cursor to 0,0 (home 
position) 

CTL („1) sets cursor colour to while 
CTL (,„0) sets screen colour to black 
CTL („„0) sets border colour to black 
CTL (,„„!) clears screen leaving cursor at 
current position 

CTL (20,12,5,0,11,1) clears screen (1), sets 
screen to black (0), border to medium 
grey (11), cursor colour to green (5), and 
cursor position to column 20, row 12. 
To print something at a specified location 
on the screen: 

PRINT CTL (x,y)"text"CTL(xl,yl)"more 
text" 

Routine entry point: S88AB 
Routine operation: The current settings 
of (he five parameters are read and the 
screen clear flag is set to 0. The open 
brackets character is scanned past and 
each of the six values is read if present, 
checking to see if there is a closing 
bracket. When the closing bracket is 
found, the screen is cleared if the flag is 
set to 1, and the other values are stored in 
their own locations. 



E 



Basic Loader 



2866 
287© 
2880 
2890 
3900 
2910 
2920 
2936 
2940 
2950 
»60 
2970 
2980 
2990 

3000 
3010 

3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 

3100 

3110 
3120 
3130 
3140 
3150 
3160 
3170 



DRTR240 , 245 , 20 1 , 1 28 , 240 , 1 56 , 1 66 3420 
DflTRl 22, 230, 11,200, 185,240, 12R 3430 
DflTRl 6, 250, 185,241, 123,208,22ft 3440 
DATA160, 0, 132, 1 1 , 136, 166, 122 3450 
DAT A202 , 200 , 232 , 1 39 , 0 , 2 . 56 3460 
DATA249, 158, 160, 240, 245, 201 , 128 3470 
DATA208, 3, 76, 255, 129, 166, 122 3480 
DATA238, 11,200, 185, 157, 160, 16 3490 
PATA250, 185, 158, 160, 208, 225, 139 3500 
DflTfl0,2,76, 1, 130,48,3 3510 
DATA76, 243, 166, 201 , 255, 240, 249 3520 
DATA36, 15,43,245,201,238,240 3530 
DRTR5, 32, 217, 130, 48, 3, 32 
DRTR136, 130,76,239, 166,260, 177 
DRTR95, 170, 132,73, 160,255-202 
DRTR240 , 8 , 200 , 1 85 , 24 1 , 1 28 , 1 6 
DRTR250, 48,245,200, 185,241, 128 
BRTR43, 5, 32, 210, 255, 208, 245 
DRTfl96,56,233, 127, 170, 132, 73 
DATA 1 60 , 255 , 202 , 240 , 8 , 200 , 1 85 

DATfilSS, 160, 16,250,48,245,206 
IiRTRlSS, 



158, 1 60 , 48 , 230 , 32 .21© 
DATR255, 208, 245, 32, 1 15, 0, 201 
DflTfl23S,246, 10,201, 153,240,: 
DRTR32, 121 , 0, 76, 231 , 167, 32 
DRTR14, 131,76, 174, 167,230, 122 
DRTR208,2,230, 123, 160,0, 177 
DflTR122,56,233, 1, 10, 168, 135 
DRTR 138, 129, 72, 185, 137, 129, 72 
DATR76, 115, 0,32, 46, 131 , 76 
DRTR 174,1 67 , 1 73 , 58 , 1 3 1 , 72 , 1 73 
DRTR57, 131 , 72, 76, 1 1 5, 0, 235 



180 DRTR 132, 169,0, 133, 13,32, 1 15 



:190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 

3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 
3370 
3330 
3390 
3400 
3410 



DRTR0, 201 , 238, 240, 6, 32, 121 
DRTR0 , 76 , 1 4 1 , 1 74 , 230 , 1 22 , 203 
DRTR2,230, 123, 160,0, 177, 122 
DRTR201 , 29, 176, 3, 76, 8, 175 

DRTR133,36, 169, 173, 72, 169, 140 
DRTR72, 198,36, 165, 36, 10, 170 
DRTR 189, 138, 129, 72, 139, 137, 129 
DRTR72, 76, 115, 0, 165, 157,240 
DRTR16, 169, 1,36,212,208, 10 
DRTR 1 65 , 203 , 20 1 , 3 , 1 44 , 4 , 20 1 
DRTR7 , 1 44 , 3 , 76 , 72 , 235 , 1 97 
DRTR 1 97 , 240 , 249 , 1 69 , 0 , 1 33 , 252 
DRTR133,251, 169, 1,44,141,2 
DRTR240..4, 169,32, 133,251, 169 
DRTR1 91, 133,252, 169, 192, 24-101 
DRTR251, 133,251, 165,203,201,3 
DRTR20S ,4,169, 24 , 203,18 , 20 1 
DRTR6,208,4, 169, 16,208, 10 
DRTR201 , 5, 208, 4, 169, 8, 208 
DRTR2 , 1 69 , 0 , 24 , 1 0 1 , 25 1 , 1 33 
DRTR251 , 160, 0, 169, 54, 133, 1 
DRTR 1 77, 251 , 240, 3, 153, 119-2 
DRTR200, 192, 8, 208, 244, 132, 198 



3540 
3550 
3560 
3570 
3530 
3590 
3600 
3610 
3620 
3630 
3640 
3650 
3660 
3670 
3680 
3690 
3700 
3710 

3720 

3730 

3740 

3750 

3760 

3770 

3780 

3790 

3800 

3310 

3320 

3830 

3340 

3850 

3860 

3870 

3380 

3890 

3900 

3910 

3920 

3930 

3940 

3950 
3960 



DRTR 169 , 55, 133, 1, 165,203, 133 
DRTR 197, 173, 141 ,2, 141, 142,2 
DATA96, 165, 153,203,4, 165, 157 
DRTR208, 3, 76, 87, 241 , 165,21 1 
DATA 1 33 , 202 , 1 65 ,214,1 33 , 20 1 , 1 
DRTR 72, 138, 72, 165, 203, 240, 6 
DATA76, 58, 230, 32, 22, 231 , 1 65 
DATA 1 98 , 1 33 , 204 ,141,146,2, 240 
DATA247, 120, 165,207,240, 12,16 
DRTR206, 174, 135,2, 160,0, 132 
DRTR207, 32, 19, 234, 32, 180, 229 
DRTR201, 131,208, 16, 162,9, 120 
DRTR 134, 198, 189,230,236- 157, 1 
DRTR2 , 202 , 208 , 24 7,240, 207 , 20 1 
DRTR13, 203, 3, 76, 2, 230, 201 
DRTR 17, 208, 193, 166, 214, 224, 24 
DHTH240, 3, 76, 15, 132, 162, 24 
DflTRl 60, 0, 24, 32, 240, 255, 230 
DRTR20,208,2,230,21,32, 19 

data i 66, 160, 1 , 177, 95, 20s, ie 

DRTR169,255, 133,20, 133,21 - 169 
DATA 185, 160, 132, 32, 30, 171 . 7*~ 
DflTRl 8, 132, 160,2, 177,95 . 133 
DRTR20 , 200 , 1 77 , 95 , 1 33 .21/169 
DRTR162, 141,0,3, 169, 132, 141 
DRTR 1,3,104,141,183,1 32 , 1 04 
DRTR141 1 184, 132, 160, 1 , 132 - 15 
DflTA76,215, 166, 169, 139, 141,0 
DRTR3 , 1 69 , 227 ,141,1,3,1 73 
DflTRl 84, 132,72, 173, 183, 132,72 
DRTR 76, 18, 132,0,0, 13, 13 
DATA 1 8, 42, 42, 42, 42, 42, 42 
DATR42, 42, 42, 42, 42, 42, 32 
DATA69, 78, 68, 32, 79, 70, 32 
DATA80, 82, 79, 71 , 82, 65, 77 
DAT A32 , 42, 42, 42, 42, 42, 42 
DRTR42, 42, 42, 42, 42, 42, 13 
DATA0 , 32 , 33 , 1 7 1 , 32 , 1 2 1 , 0 
DATA240, 80, 240, 94, 201 , 163, 240 
DATA 1 07 , 20 1 , 1 66 , 24 , 240, 1 02 , 20 1 
DATA238,208,20, 160, 1, 177, 122 
DATA201 , 2, 208, 12, 32, 115,0 
DATA32, 115,0,32, 139, 133,76 
DATA233, 132, 32, 121 , 0, 201 , 44 
DATA240, 55, 201 , 59, 240, 97 - 32 
DATA 158, 173,36, 13,48, 195,32 
DATR221 , 189, 32, 135, 130, 32, 33 
Dfl Tfl 1 7 1 , 32 , 59 , 1 7 1 , 208 , 1 34 , 1 69 
DRTR0 ,157, 0 ,2,1 62 , 255 , 1 60 
DflTRl , 165, 19,208, 16, 169, 13 
DATA32, 71 , 171 , 36, 19, 16, 5 
DATA 1 69 , 1 0 , 32 , 7 1 , 1 7 1 , 73 , 255 
DATA96, 56, 32, 240, 255, 152, 56 
DATH233, 10, 176, 252, 73, 255, H 
DATA1 , 208, 25, 8, 56, 32, 240 
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Machine Code Listing 



397Q DflTfl255 , 132,9 , 32 , 155,1 83 , 20 1 
3980 DATA41, 240, 3,76,3, 175,46 
3990 DATA144,6, 138,229,9, 144,5 
4090 DATA 1 70 , 232 , 202 , 208 ,6,32,115 
4010 DATA0,76,238, 132,32,59, 171 
4020 DATA28S , 242 , 76 , 30 , 1 7 1 , 32 , 1 2 
4030 DflTR134,32,250, 174,32, 121, W 

4049 DATA32,49, 134, 176,8,32,69 

4050 DATA! 34 , 1 42 , 1 1 1 , 1 34 , 1 76 , 66 , 32 
4060 DRTR46, 134, 176, 8, 32, 78, 134 
4070 DATA 142,112,134,176,53,32,46 
4030 DRTfl 134, 176,3,32,72, 134, 142 
4090 DATA1 13, 134, 1 76 , 40 , 32 , 46 , 1 34 
4100 DATA176,3,32,72, 134, 142, 114 
4110 DflTfll34, 176,27,32,46, 134, 176 
4120 DflTfl8,32,72, 134, 142, 115, 134 
4130 DATA 176, 14,32,46, 134, 144,3 
4140 DflTfl76,S, 175,32,75, 134, 142 
4150 DATA116, 134,32,247, 174, 173, 116 
4160 DATA134,240,5,169, 147,32,22 

41 70 DflTfl23 1 , 1 73 , 1 1 3 , 1 34 , 1 4 1 , 1 34 , 2 
4 1 30 DATA 1 73 ,114,134,141, 33 , 203 , 1 73 
4190 DATA115, 134, 141,32,208, 172, 111 
4200 DATA 134, 174, 112, 134,24,76,240 
42 1 0 DATA255 , 56 , 32 , 240 , 255 , 140,111 
4220 DATA 1 34 , 1 42 ,112,1 34 , 1 73 , 33 , 203 
4230 DAT A 1 41,114,1 34 , 1 73 , 32 , 208 ,141 
4240 DATA1 15, 134, 173, 134,2, 141 , 1 13 
4250 DAT A 1 34 , 1 69 , 0 , 1 4 1 , 1 1 6 , 1 34 , 96 
4260 DATA32 ,115,0 , 20 1,44, 203 , 2 
4270 DRTA56 , 96 , 20 1,41, 240 , 2 , 24 
4280 DAT A96 , 1 04 , 1 04 , 32 ,115,0 , 76 
4290 DATA230, 133, 169, 40, 44. 169, 16 
4300 DATA44, 169,2,44, 169,25. 141 
43 1 0 DATA 110,1 34 , 32 , 1 58 , 1 S3 , 236 ,110 
4320 DATA 134, 176, 14,32, 121,0,201 
4330 DATA41 , 240, 211, 201 , 44 . 240, 213 
4348 DATA76,8, 175, 162, 14,76,55 
4350 DATA 1 64 , 0 , 0,0, 0 , 0 , 0 
4360 DATA0 ,76,113,1 68 , 76 , 8 , 1 75 
4370 DATA76,8, 175,76,3, 175,76 
4330 DAT AS, 175,76,8, 175,76,8 
4390 DATA 1 75 , 76 ,8,1 75 , 76 , 8 , 1 75 
4400 DATA76,8, 175, 76, 8, 1 75, 76 




INITRT 
=13000 

. WOP COLD ;C0LD START ENTRV 

.WOR WRST - RESTORE ENTRV 

.BYT $C3-*C2,JCD-"S0' 



. NOR JE38B 
.WOR JA4S3 
. WOR CRNCHT 
. WOR PRINT 



VECTOR JMP JB243 
.BYT 0 
. WOP *EA31 
. WOP WRSTOl 
. WOP JFE47 
-WOP *F34A 
.WOR JF291 
. WOP JF20E 
. WOP JF250 
.WOR JF333 
.WOR LISTER 
.WOP *F1CA 
.WOP *F6EB 
.HOP JF13E 
.UOR JF32F 
.WOR WRSTOl 
. WOP JF4A5 
. WOR fF5ED 



WRST JSR 
JSP 
BEO 
JMP 

WPSTOl JSR 
JSP 
JSP 
JSP 
LDA 
STA 
JSP 
CLI 

WPST02 LPX 
JMP 



JF6BC 
fFFEl 

WRSTOl 

$FE?2 

JFDA3 

$E51S 

SETKER 

fFFCC 

»*00 

*I3 

ffl67fl 

#J30 

IE 333 



44 1 0 DAT AS , 1 75 , 76 , 8 , 1 75 , 76 , 3 
4420 DATA175,76,8, 175,76,8. 175 
4430 DATA76,3,175,76,3, 175,76 



SETKEP LJJli JKVECTOR 

LEV #>VECTOR 

STX IC3 

STV iC4 

LBV «I23 



LDA <$C3J.V 
STA *03IO,V 

rev 

BPL STKEP1 
LDA (KFUNC 
LDV tOFUNC 
STfl *028F 
STV JO290 
RTS 



4440 DATA8 , 1 75 , 76 , 3 , 1 75 , 76 , 3 
4450 DATA175,76,8, 175,76,8,1 
4460 DATA76..8, 175,76,3, 175,76 
447Q DATA8, 175,76,8, 175,76,8 
44S0 DATA175,76,S, 175,76,3, 17 
4490 DATA76 ,3,175,1 36 , 33 , 30 , 255 , - 1 




;USR JUMP 

.IRG 
i BREAK 
MM I 
i OF'EN 
; CLOSE 

■ SET INPUT 
;3ET OUTPUT 

; RESTORE I/O 
; INPUT 
J OUTPUT 
•TEST-STOP 
; GET 

■ABORT I/O 
WARM RESTART 
.; LOAD 
; SAVE 

i UPDATE TIME 

;STOP KEV? 

:VES 

•NO 

;INIT i/o 
;INIT VIC CHIP 
;INIT KEPNAL ■■'ECTOPS 

■ RESTORE I/O 

■ 

; INPUT PROMPT FLAG 
MNIT BASIC 
j ENABLE IRQ 
.SET FOR READY 
•GO TO READY 

; POINT TO 
KEPNAL VECTORS 



■LOOP TO COPV VEC TORS 

;GET BVTE 
; STORE IT 

•AND NEXT 

-POINT TO FUNCTION 
. KEV ROUTINE 
; STORE IN KEYBOARD 
I TABLE SETUP VECTOR 



I SHRINK SCREEN 
;INIT I/O 

MNIT SYSTEM CONSTANTS 

-SET KEPNAL VECTORS 
, ENABLE IRQ 
-SET BASIC VECTORS 
MNIT BASIC 
,SET TOP OF RAM 



E 




Machine Code Listing 



STA $37 
LDA #<POWER 
LDV #>POWER 
JSR $E42D 
LDX #$FB 
TXS 

BNE HRST02 
POWER .BVT $93.$0D 



; point to power 
;up message 
; output message 

.set stack pointer 
; always 



.BVT ' **** EXTENDED 64 BASIC 
. BVT - V01 #***', $0D,$OD 

.BVT ' 64K ROM SVSTEM '.$00 



SETBAS LDX #$0B 
STBAS1 LDfl LINK.X 

STfl $0306, X 

DEX 

BPL STBflSl 
RTS 



;GET P BVTE 
; STORE IT 



;D0 NEXT 



CLIST . BVT W.$CE 
. BVT 'CT',$CC 
. BVT 'APPEN'.$C4 
.BVT 'AUT',$CF 

.BVT -TATALO* >$C? 
. BVT 'CHANG' . $C5 

.BVT <emi'*tcE 

•BVT 'CRUNC- .$C8 
• BVT -DELET,$C5 
.BVT 'DIS'.$CB 
.BVT 'B0K',$C5 
.BVT 'DUM',$D0 
.BVT 'EXE',$C3 
.BVT FIN',*C4 
. BVT 'G£',$B4 
.BVT 'KE',$D9 
.BVT 'F1R',*D4 
.BVT -MERG',$C5 
.BVT '0L',$C4 
.BVT 'PO"',$D0 
-BVT 'PU',$D4 
.BVT 'RENUMBE' > $D2 
• BVT -REPEA'',$D4 
.BVT 'S0R',$D4 
-BVT ' TRACEO ' . $CE 
.BVT 'TRACE0F',$C6 
.BVT 'TVF',$C5 
.BVT -UNTI'.$CC 



DEE . $CB 











_ 



•BVT 'HIHE'/*CD 
■BVT 'LOME',$CD 
.BVT 'VARPT',$D2 
. BVT @ 



DADDR 



.WOR 
.WOR 
.WOR 
.WOR 
-WOR 
. WOR 
.WOR 
. WOR 
. WOR 
.WOR 
. WOR 
. WOR 
.WOR 
. WOR 
. WOP 
. WOR 
. WOR 
. WOR 
. WOR 
-WOR 
.WOR 
.WOR 
. WOR 
.WOR 
.WOR 
.WOR 
• WOR 
. WOR 

. WOR 
. WOR 
. WOR 
. WOR 



RUN-1 

CTL-1 

APPEND- 1 

AUTONO-1 

CATLOG-1 

CHANGE- 1 

CHAIN-1 

CRUNCH- 1 

DELETE- 1 

DISK-1 

DOKE-I 

BUMP-i 

EXEC-1 

FIND-1 

GET-1 

KEV-1 

MAT-1 

MERGE- 1 

OLD-1 

POP-1 

PUT-1 

RENUMB-! 

REPEAT- 1 

SORT- X 

TRON-i 

TROFF-i 

TVPE-1 

UNTIL-1 

DEEK-I 
HIMEM-1 
LOMEM-1 
VARPTR-1 



FHSTPT -23 
END 

LIB CRUNCH- TOKEN 
CRUNCH KEYWORD LINK 



CRNCHT 



CRNC61 



LDX 
LDV 



$7A 
#$04 

STV $0F 
LDA $0200- X 
BPL CRNC02 
CMP #$FF 
BEQ CRNC08 
I NX 

BNE CRNC01 



CRNC02 CMP 
BEQ 



#$20 
CRNC08 



STA $0S 
CMP #$22 
BEO CRNC 12 
BIT $8F 
BVS CRNCOS 
CMP #$3F 
BNE CRNC03 

#$99 
BNE CRNCOS 

CPNC03 CMP #$30 

BCC CRNC 04 
CMP #$3C 
BCC CRNCOS 

CRNC04 JMP CRNC 15 



;get CHAP 

;CHAR IS OK 
;PIPRINT 
;VES.SEND IT 
;N0, ILLEGAL CHAR 
; SO DO NEXT 

;SPACEPPINT 
.iVES, SEND IT 

;quotesprint 

:VES, SCAN QUOTE END 

> SEND CHAR 
> 'PRINT' PRINT 
;N0 

;SET TO PRINT TOKEN 
'• SEND IT 








Programming 




*01FB,V 
#JEE 
CRHCI4 
*01FB,V 
CRNC13 

#*3fl 
CRNC09 
*$49 
CRNC10 
*0F 

tt*55 
CRNC01 
*08 

CRNC11 LDA *9200-X 
BEQ CRNC68 
CMP *08 
BEQ CRNC08 

CRNC12 IHV 

STfl *01FB,Y 
I NX 

BNE CRNC11 

CRNC13 STfl *01FD,Y 
DEC *7B 
LDfl #*FF 
STfl *7A 
RTS 

CRNC14 LDfl «0B 
INV 

STfl *01FB.V 
JMP CRNC01 

CRNC15 STV f?l 
LDV #JFF 

STX *7A 

DEX 

LDfl #$01 
STfl *0B 
CRNC16 INV 
I NX 

CRNC17 LDfl *0200,X 
SEC 

SBC CLIST,Y 
BEQ CRNC16 
CMP #*S0 
BEQ CRNC05 
LDX $7A 
INC JOB 
CRNC1S INV 

LDfl CLI3T-1, 
BPL CPNC18 
LDfl CLIST,V 
BNE CRNC17 
LDV #*00 
STV JOB 
DEV 

LDX «7fl 
DEX 

CRNC19 INV 
I NX 

CRNC20 LDfl t0200.X 
SEC 

SBC *R09E-V 
BEQ CRNC19 
CMP #*80 
BNE CRNC21 
JMP CRNC06 
CRNC21 LDX *7fl 
INC *0B 



CRNC22 



INV 

LDfl *A09D,V 
BPL CRNC22 
LDfl *A09E,V 
BNE CRNC20 
LDfl 10200.. X 
JMP CRNC07 



Machine Code Listing 



; STORE IT 

, MINEPRINT 

;VES, SEND 2ND BVTE 

,NO, END OF INPUTPRINT 

;VES 

PRINT 

; VES 

; DATA ? 

;NO 



REM ? 

NO DO NEXT CHAR 
SET QUOTE FLAG 
GET BVTE 

END OF INPUT, SEND 
QUOTE FLAGPRINT 
VES, SEND 
STORE CHAR 



;DO NEXT 
; STORE ZERO 



EXIT CRUNCH 

GET 2ND BVTE 

STORE IT 

DO NEXT BVTE 

SAVE OFF V 

AND X POINTERS 
; START TOKEN VAL=1 

;GET BVTE 

;AS KEYWORD TABLEPRINT 
;YES, CHECK NEXT 
; SHIFT OUTPRINT 
,VES- FOUND 

; RESTORE BUFFER POINTER 
;NEXT TOKEN 

;END OF KEVWORDPRINT 

;NO 

1 END OF TABLEPRINT 
;NO, CHECK NEXT 
; START TOKEN AT 0 
,FOR BASIC 

..GET INPUT POINTER 



;GET BVTE 

;flS IN TABLEPRINT 
:VES. CHECK NEXT 
iSHIFT OUTPRINT 
.NO, TRY NEXT WORD 
;YES, SEND BASIC TOKEN 
; RESTORE INPUT POINTER 
: NEXT TOKEN 

;END OF WORDPRINT 
,NO 

; END OF TABLEPRINT 
;NO, TRV NEXT WORD 
,ELSE SEND BVTE 



PRINT TOKENS LINK 

FOR USE WITH THE ROUTINES IN 
'ADVANCED COMMODORE 64 BASIC REVEALED' 



PRINT 

PRINOl 

PRIN02 



PRIN08 
PRIN13 

■ 

PRIN03 



PRIN04 
PRIN05 

PRIN06 
PRIN07 



BMI PRIN02 
JMP JA6F3 
CMP #*FF 
BEQ PRINOl 
BIT *0F 
BMI PRINOl 
CMP #*EE 
BEQ PRIN08 
JSR PRIN09 
BMI PRIN13 
JSR PRIN03 
JMP $fl6EF 



INV 

LDfl (*5F),V 
TAX 

STV *49 
LDV #*FF 

DEX 

BEQ PRIN06 
INV 

LDfl CLIST.V 
BPL PRINOS 
BMI PRIN04 
INV 

LDA CLIST,Y 
BMI PRINO? 

BNE PRIN06 
RTS 



;A TOKEN 
PRINT IT 
IS IT PI? 
VES 

QUOTES? 
VES 

ONE OF MINE? 
DO MINE 
DO BASIC 
ALWAYS 
DO MINE 
AND NEXT 

:GET TOKEN CHAR 



,SAVE V 



; FOUND IT 

; GET CHAR FROM TABLE 
J UNTIL END OF WORD 
; FOUND END OF WORD 

;GET CHAR FROM TABLE 
;LflST CHAR OF WORD 



; PRINT IT 
• NEXT CHAR 
iDO LAST 



; REMOVE SHIFT 
;SflVE .V 



; FOUND IT 

;GET CHAR FROM TABLE 
, UNTIL END OF WORD 
; FOUND END OF WORD 

.; GET CHAR FROM TABLE 
;LAST CHAR OF WORD 
; PR I NT CHAR 
, ALWAYS 



PPIN09 SEC 

SBC #*7F 
TAX 

STV $49 

LDV #*FF 
FPINIO DEX 

BEQ PR IN 12 
PRIN11 INV 

LDA JA09E-V 

BPL PRINU 

BMI PR INI 0 
PRIN12 INV 

LDfl *A09E.V 

BMI PRIH07 

JSR JFFD2 

BNE PRINI2 
.END 

.LIB HANDLE- TOKEN 

; EXECUTE STATEMENT LINK 

THE ROUTINES IN 

64 BASIC REVEALED" 

•GET CODE 
; IS IT MY TOKEN? 
;YES, DO IT 
MS IT PRINT? 

;YES . 

;GET CURRENT CHAR 
;DO BASIC CODE 

; EXECUTE THE CODE 
- AND NEXT 
;GET TOKEN CHAP 



. END 



I 

HANDLE JSR $0073 
CMP #*EE 
BEQ HflNDOl 
CMP #J99 
BEQ DOPRNT 
JSR J0O79 
JMP *A7E7 

HAHD01 JSR HAND02 

JMP S A7AE 
HAND02 INC *7fl 

BNE HAND04 

INC *7B 
HAND04 LDV #*00 

LDfl <*7fl>,Y 

SEC 

SBC #*01 
flSL fl 
TflV 

LDA CADDR+l.V 
PHA 

LDfl CADDR? Y 
PHA 

JMP I0O73 



;OET INPUT BVTE 



i TIMES 2 

;GET HI BVTE 
;TO STACK 
;GET LO BYTE 
,TO STACK 
; EXECUTE IT 



E 



Machine Code Listing 




3 



■ PRINT SPECIAL CASE 

DOPRNT JSR HANDS3 
JMP $A7AE 

HAND03 LDA PADDR+1 
PHA 

LDA PADDP 
PHR 

JMP $0073 
PfiDDR .1-10R PRINTT-1 
. END 







;do print command 
;do next command 

' get hi evte 
j to stack 

i GET LO EVTE 
;TO STACK 
; EXECUTE PRINT 
i VECTOR FOR PRINT 




.LIB ARITH-TOKEN 
i ARITHMETIC LINK 

' son, EPS USE lJITH THE ROUTINES IN 

i ADVANCED COMMODORE 64 BASIC REVEALED' 



ARITH 



LDA #$0O 
STA $8D 
JSR $0073 
CMP #$EE 
BEQ ARITH1 
JSR $0079 
JMP $AE3D 



ARITH1 INC $?A 

BNE ARITH3 
INC $7B 

ARITH3 LDV #100 

LDA C$7A),Y 
CMP #FNSTRT 
ECS ARITH2 
JMP $AF08 



ARITH2 STA 
LDA 
PHA 
LDA 
PHA 
DEC 
LDA 
ASL 
TAX 
LDA 
PHA 
LDA 
PHA 
JMP 

.END 



$24 
#$Ap 

#$8C 

$24 
f24 
A 

CADDR+1 ,X 

CADDR.X 

$0073 



- 



: f 



E 



.LIB 


FUNC-KEVS 


FUNC 


LDA *9D 




BEQ FUNC01 




LDA #$01 




BIT $D4 




BNE FUNC01 




LDA $CB 




CMP #*03 




BCC FUNC01 




CMP #t07 




BCC FUNC 02 


FUNC01 


JMP $EE4S 


FUNC02 


CMP $C5 




BEQ FUNCOl 




LDA #$O0 




STA $FC 




STA $FE 




LDA #$01 




BIT $02SD 




BEQ FUNC03 




LDA #$20 




STA $FB 


FUNC63 


LDA #$BF 




STA $FC 




LDA #$C0 




CLC 




ADC $FB 




STA $FB 




LDA $CB 




CMP #$03 




BNE FUNC04 




LDA #24 



-TYPE FLAG TO NUMERIC 

•GET BVTE 

i ONE OF MINE? 

;VES 

;GET CURRENT CHAR 
; OPERATE 

;GET TOKEN CHAR 



;GET INPUT EVTE 
;IS IT A FUNCTION 

. VES 

; SYNTAX ERROR 

;SAVE TOKEN VAL 
.SETUP RETURN ADDRESS 



'GET TOKEN 
i TIMES 2 

;get HI BVTE 

-GET LO BVTE 

i EXECUTE FUNCTION 



i DIRECT? 

;NO 

; QUOTES? 



;VES- IGNORE 
;KEV PRESSED 
:F7? 

:NO, LESS THAN 

;F5? 

.YES, IS A FUNCTION KEV 
■DO NORMAL KEVS 



BNE FUNC07 

FUNC04 CMP #$06 

BNE FUNC05 
LDA #16 
BNE FUNC07 

FUNC05 CMP #$05 

BNE FUNC06 
LDA #8 
BNE FUNC07 

FUNC06 LDA #$00 

FUNC07 CLC 

ADC $FB 
STA $FB 
LDV #$00 
LDA #$36 
STA $01 

FUNC08 LDA ($FB>,Y 
BEQ FUNC09 
STA $0277, V 
INV 

CPV #$08 
BNE FUNC08 
FUNC09 STV $C6 
LDA #$37 
STA $01 
LDA $CB 
STA $C5 
LDA $02SD 
STA $02S£ 
RTS 

.END 

.LIB LISTER 

LISTER LDA $39 

BNE LIST01 
LDA $9D 
BNE LIST02 

LISTOl JMP $F157 

LIST02 LDA $D3 
STA $CA 
LDA $D6 
STA $C9 
TVA 
PHA 
TXA 
PHA 

LDA $D0 
BEQ LIST04 
JMP $E63A 



LI3T03 
LIST04 



ALREADV DONE? 
POINTER 



.SHIFT KEV? 

;NO 



: ADD START OF STORE 
> TO POINTER 



LIST05 



LIST06 



L IST07 



JSR $E716 
LDA $C6 
STA $CC 
STA $0292 
BEQ LIST04 
SEI 

LDA $CF 
BEQ LIST05 
LDA $CE 
LDX $02S7 
LDV #$00 
STV $CF 
JSR SEA 13 
JSR $E5B4 
CMP #$83 
BNE LIST07 
LDX #$09 
SEI 

STX $C6 
LDA $ECE6,X 
STA $8276. X 
DEX 

BNE LIST06 
BEQ LIST04 
CMP #$0D 
BNE LIST08 
JMP $E602 



-F7? 

;no 



LISTOS CMP #$11 

BNE LISTOS 
LDX $D6 
CPX #24 



;F5? 

;NO 



;F3? 
.NO 



r BE Fl 
i VAL INTO POINTER 



SWITCH OUT BAS ROM 

;get CHAR 

• ZERO BVTE TERMINATOR 
J STORE IN BUFFER 

.ALL 8? 
;NOT VET 

-MCHARS IN BUFFER 
.:PUT BASIC ROM BACK 

:SET LAST=PRESENT 

j KEVS, 

J SHIFT COMBO 

iALL DONE 

;not kevboard 

;is direct input 
;do normal 

;save current cursor 

j COLUMN 

; AND ROW 
;SAVE .X AND .V 



-screen or kevboard? 
; kevboard 
;do for screen 

.-display char to screen 
;anv chars in buffer? 
jlf not. blink cursor 
.auto scroll down 
; repeat until char 
■disable kevboard 
." cursor blink? 

;NO 

; RESTORE ORIGINAL CHAR 
; AND COLOUR 

i SWITCH OFF EL INK 
■ RESTORE 

■REMOVE CHAR FROM BUFFER 
. RUN/STOP? 

;NO 

J COPY TEXT INTO BUFFER 



.: REPEAT UNTIL ALL DONE 

J DONE. OPERATE ON RUN/STOP 

; CARRIAGE RETURN? 

.'NO 

.END OF INPUT 

i CURSOR DOWN? 
.NO GET NEXT CHAP 



.SCROLL SCREEN? 



Programming 



Machine Code Listing 



BEG! LI^TOS 


; YES 


IMP 1 T^Tfn 


Nfl NFVT r MAP 




■qft niPQnp TCi 

' ot 1 L-URoUK 1 U 






LLC 




Jbh Vrr.ru 




1 NL- * 1 4 


* PI KIT! UFVT 1 IkIC Tfi 
/rltiii Nt^l LINt fU 


JSNt Lib 1 1'-' 


; LIST 


INC 114+1 




LIbTIO JSR $A613 


/ ub 1 -nJji'Kbbb 


LJJt »*U1 




I TtO / t^iC S L> 

LUn «. *Dr ? , Y 


tNJJ L'r rKUoKnn f 


Til ir~ I T < 4 

#Nb LIbl 1 1 




LJJn »*rr 




bin $14 


Nt a 1 L 1 Nh NUmjfcK— W 


era * i i i. ^ 
b 1 n »14+1 




Llin B'.tUrrltb 


' TFI 1 1 IQFP TUIflT TUF 
• 1 tLL UbtK mrll Infc 


LDV H^EOPNEb 


■ bND Ur hKUUKflM Hnb 


JbR $HBlb 


i bbbN KhHLntli 


J rir L 1 b I o*» 


; utl McaI LnnK 


LIST 11 LDt #$02 


-bET LINE NUMBER 


LDM <$5F).V 


-L0 BYTE 


VTA $14 


I NY 




LDA <,$5F>.V 


- I t T Til ITT 

,HI BYTE 


bin $14+1 




LJJn (KLlbl Is 


/ktlUKN IU Llblla 


b 1 M $U3VU 


• OCT CD 1 let 


LUn ff.'Llbl la 




b In $UoU 1 




PLA 




STfl, STACK 


^ SAFE LOCATION 


PLA 




STA STACK* 1 




1 T><J 4-'|-| 1 




STV $0F 




JMP $A6D7 


;LIST LINE 


LIST12 LDfl #$SB 


; RESET ERROR VECTOR 


STfl *03O0 




LDfl #$E3 




STfl $0301 




LDfl STACK* 1 


; RESTORE 2 BYTES 


PHfl 




LDfl STACK 




PHfl 




JMP LIST04 


;D0 NEXT CHAR 


STACK .WOR 0 




EOPMES .BVT $0D.$0B. 




. BVT '#***##*#**** END OF PROGRAM **#*#*###**# 


.BVT $0D,f09 




.LIB PRINT 




PRNT01 JSR $AB21 


;PRINT STRING 



JSR 
JSR 
JSR 
BNE 

FRNT04 LDfl 
STA 
LDX 
LDV 
LDA 
BNE 

PRNT05 LDfl 
JSR 
BIT 
BPL 
LDA 
JSR 

PRNT06 EOR 
PPNTO? RTS 



$B48? 
tflB21 
$AB3B 
FRNT92 

»J00 

$0209- X 

#$FF 

H$01 

$13 

PRNT67 

t»$0D 

$AB4? 

$13 

PRNT06 
t*$0fl 
$AB47 
#*FF 



.CARRIAGE RETURN 



;FILE#>128 NO LF 
iLINE FEED 
..PRINT IT 



DECIMAL TftBLUATOR 

PRNT09 SEC 

JSR $FFF0 

TVfl 

SEC 



PRNT10 SBC #$0A 

BCS PRNT10 
EOR #$FF 
ADC #$01 
BNE TAB01 

i TAB AND SPC 



j GET CURSOR POS 



MINUS 10 



PRHT02 JSR $0O?9 
PR I NTT BEG PRNT05 
PRHT63 BEQ PRNT07 
CMP #$fl3 
BEQ TAB 
CMP #$A6 
CLC 

BEQ TAB 
CMP #$EE 
BNE PRNT08 
LDV #$0I 
LDfl <$7A>,V 
CMP #$02 
BNE PRNT08 
JSR $0073 
JSR $0073 
JSR CTL 
JMP PRNT02 

PRNT08 JSR $8079 

CMP #»2C 

BEQ FRNT09 

CMP #*3B 

BEQ TAB04 

JSR $AD9E 

BIT $9D 

BMI FRNTOl 

JSP vBBDD 



■ GET CURRENT CHAP 
; CARRIAGE RETURN 
- SEMICOLON 
;TAB? 
.YES 

;spc? 

.YES 
; MINE? 
;N0 

;GET TOKEN 

;CTL? 

i NO 

;GET NEXT CHAR 
;D0 CTL 



; GET CURRENT CHAR 
YES 

';'? 

VES 

EVALUATE EXPRESSION 
WHICH TYPE? 
STRING 
. CONVERT FAC#1 TO STRING 



1 nU 


PHP 








SEC 








JSR 


$FFF0 


JGET CURSOR POSITION 




STY 


$09 


; STORE IN TEMP 




JSR 


*B79B 


;GET 1 BYTE PAR 




CMP 


tt$29 


;'>'? 




BEQ TAB 19 


iVES 




JMP 


$AF38 


; SYNTAX ERROR 


TAB 10 


PLp 




; TAB OR SPC? 




BCC 


TAB02 


J SPC 




TXA 




.TAB VALUE 




SBC 


$09 


;MINUS COLUMN POSITION 




BCC 


TAB04 


.LESS THAN 


TAB01 


TAX 






TAB02 


INX 






TAB03 


DEX 








BNE 


TAB85 




TAB04 


JSR 


$0073 


iGET NEXT CHAR 




JMP 


PRNT03 


.BACK TO PRINT 


TAB85 


JSR 


$AB3B 


; OUTPUT SPACE/RIGHT 




% 




: ALWAVS 










.END 






.LIB 


CTL 






CTL 


JSR CTLDEF 


;SET DEFAULT 




JSR $AEFA 


JSCAN *<* 




JSR 


$0879 


-GET CURRENT CHAR 




JSR 


CHECKN+3 


; NEXT PAR? 




BCS 


CTL01 


;N0 




JSR 


GV1 


■ GET VALUE 




STX 


CTXPOS 


; STORE IT 




BCS 


CTLEN1 


J FOLLOWED BY '>' 


CTL01 


JSR 


CHECKN 


;NEXT PAR? 




BCS 


CTL02 


;N0 




JSP 


GV4 


;GET VALUE 




STX 


CTVPOS 


; STORE IT 




BCS 


CTLEN1 


FOLLOWED BV 


CTL02 


JSR 


CHECKN 


; NEXT PAR? 




BCS 


CTL03 


;N0 




JSR 


GV2 


i GET VALUE 




STX 


CTCUR 


; STORE IT 




BCS 


CTLEN1 


- FOLLOWED BY 


CTL03 


JSP 


CHECKN 


;NEXT PAR? 




BCS 


CTL04 


;NO 




JSR 


GV2 


'GET VALUE 




STX 


CTSC 


; STORE IT 




BCS 


CTLEN1 


; FOLLOWED BV 


CTL04 


JSP 


CHECKN 


; NEXT PAR? 



Machine Code Listing 



Progra 



mm 





BCS CTL05 
JSR GV2 
STX CTBD 
BCS CTLEN1 
JSR CHECKN 
SCC CTL06 
JMP JAF08 
JSR GV3 
STX CTCFLG 
JSR *AEF7 



CTCFLG 

CTEND1 

#147 

$E?16 

CTCUR 

f9286 

CTSC 

*D021 

CTBD 

CTXPOS 
CTVPOS 



: 




*FFF6 



JFFF0 
CTXPOS 
CTVPOS 
LDfl $D021 
STfl CTSC 
LDfl *D02O 
STA CTBD* 
LDfl $0286 
STfl CTCUR 
LDfl #*00 
STfl CTCFLG 
RTS 



CHECKN JSR 
CUP 
BNE 

CHECKS SEC 
RTS 
CMP 
BEG! 

CHECKC CLC 
RTS 

CHECKft PLfl 
PLfl 
JSR 
JMP 



*00?3 

#*2C 
CHECKB 



#t29 

CHECKfl 



;NO 
■GET VALUE 
STORE IT 
i FOLLOWED BV 

;next par? 
;ves 

; comma, svntox error 
;get value 

; STORE IT 
iSCflN ')' 

; CLEAR SCREEN? 

;NO 

;CHAR FOR CLS 
; OUTPUT TO SCREEN 
' GET CURSOR COLOUR 
^SET IT 

-GET SCREEN COLOUR 
•SET IT 

;GET BORDER COLOUR 
'SET IT 

-GET X POSITION 

;SET CURSOR POS AND EXIT 

;flag read 
;get cursor pos 

-STORE X 
> STORE V 

'GET SCREEN COLOUR 
; STORE IT 
' GET BORDER COLOUR 
'STORE IT 

J GET CURSOR COLOUR 
; STORE IT 

-ZERO SCREEN CLEAR 
'FLAG 



■get next char 
;is it a comma? 
;no 

;flag for comma 

ilS it o'? 

.:VES, DONE 



GV3 
GV4 



• SET NO COMMA 



GERR 



VCOMP 
CTXPOS 
CTVPOS 
CTCUR 
CTSC 
CTBD 
CTCFLG 
. END 
• LIB 
RUN 
APPEND 
ftUTONO 
CflTLOG 
CHANGE 
CHAIN 
CRUNCH 
DELETE 
DISK 
DOKE 
DUMP 
EXEC 
FIND 
GET 
KEY 
MAT 
MERGE 
OLD 
POP 
PUT 
RENUMB 
REPEAT 
SORT 
TRON 
TROFF 
TVPE 
UNTIL 
DEEK 
HI MEM 
LOMEM 
VAPPTR 



LDA #2 
. BVT *2C 
LDA #25 
STA VCOMP 
JSR *B79E 
CPX VCOMP 
BCS GERR 
JSR $6Q?9 
CMP #$29 
BEQ CHECKS 
CMP #«2C 
BEO CHECKC 
JMP JAF08 
LDX #$0E 
JMP *A437 

• BVT 0 
. BVT O 
.BVT 0 
.BVT 0 
. BVT 0 
. BVT 0 
.BVT 0 



• COMPARE CLEAR FLAG 
-SKIP 

; COMPARE V POS 

i STORE COMPARE VALUE 

'GET 1 BVTE# 

;IN RANGE 0- < VCOMP- 1? 

- NO 

;get current char 

• IS IT 'V 
;VES, FLAG END 

'VALUE COMPARE 
JX POSITION 
iV POSITION 
-CURSOR COLOUR 
. SCREEN COLOUR 
; BORDER COLOUR 
; CLEAR SCREEN FLAG 



DUMMY 
JMP JA371 
JMP $ AF08 
JMP *AF08 
JMP *AF08 
JMP f AF03 
JMP JAF0S 
JMP f AF08 
JMP *AF08 
JMP JAF03 
JMP *AF03 
JMP *AF08 
JMP *flF03 
JMP *AF08 
JMP JAF08 
JMP 1AF08 
JMP JAF08 
JMP *AF08 
JMP *AF03 
JMP JAF08 
JMP JAF03 
JMP *AF03 
JMP #AF0S 
JMP *AF08 
JMP *AF08 
JMP *AF08 
JMP JAF08 
JMP *AF08 
JMP *AF08 
JMP *flF08 
JMP tAFOS 
JMP *flF03 




: . 



Dave Crisp has been looking 
at serious business software 
from Gemini — here's his 



THIS LITTLE OFFERING COMES FROM 
Gemini a company purporting to be the 
home of "serious software". The title 
suggests that Gemini has more business 
goodies in the pipeline and the "serious 
software" slogan bears some thinking 
about. Looking up "serious" in my 
dictionary gives me synonyms such as 
"grave" - perhaps a portent of the 
consequences of running the software! 

Anyway brass tacks first... 

Business Pack No 1 contains a 
Cashbook system, a VAT file facility and a 
Final Accounts package. A pretty 
comprehensive trio of programs for 
anyone who needs to keep accounts. 

The pack comes complete with three 
manuals/user guides. These are quite well 
presented if a little light on content and 
obviously devised by someone who 
knows accountancy and computers a 
great deal better than he does the users. 

My accountant was quite impressed 
with the facilities offered by the package, 
but threw up his hands in horror when I 
explained that it was designed for use by 
small businesses with little or no expertise 
in either book-keeping or data 
processing. 

The review copy came on disk and 
loaded painlessly enough, albeit slowly. 
The tape-based version comes on three 
separate cassettes and, presumably takes 
long enough to LOAD to allow you to 
pop down to the Dog & Diskdrive for 
pint. 

Finding a spelling mistake in the 
opening paragraph of the operating 
instruction notes does nothing to 
improve sagging confidence, but plough 
on regardless. . . 

Each session begins by requesting you 
to enter a date. Remember its accuracy is 
vital to the end result. The system 
calculates the day of the week for you - 
but take care! 

Various prompts appear to assist you as 
the session progresses. Obviously when 
setting the system up from scratch there 
are functions to carry out which won't be 
required again until the start of a new 
accounting year. The first of these (and 
potentially the most dangerous) is 
prompted by "Initialise a new file?". A 
"Y" response requests confirmation. At 
this stage if you respond in the affirmative 
all account balances are cleared down - 
not much fun if you are halfway through 
your financial year! 

Cashbook entries are restricted to 25 
transactions per batch, whilst analyses and 
posting totals are only allowed to five 
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separate accounts. If you are inputting a 
lot of data it is wise to do some pre- 
processing analysis of your own (i.e. sort 
different types of transactions into 
separate piles). Gemini recommends 
labelling each batch with a header 
containing details of the entries - 
imperative if you are to have any check 
against the various totals which will 
eventually appear on your printed 
reports. 




Each of the three systems gives you a 
menu. The options obviously vary 
according to the particular service you 
wish to access. Every conceivable alter- 
native is included, but be sure you fully 
understand the implications of the actions 
you take - particularly at the Journal entry 
stage. Single entry journals are frowned 
on by many accountants. To make sure 
your's is happy be sure to keep plenty of 
documentary back-up and remember 
that there is no automatic entry to Control 
or VAT memo accounts. Always err on the 
side of caution. 

There are enough report options 
available to satisfy the most critical of 
accountants and the output from the VAT 
File system should be sufficient to allow 
you to complete your returns without any 
problem. 



The ususal dangers stalk the night jo 
far as printers are concerned - a general 
problem. Don't switch off in the wrong 
sequence or while a program is running. 
Also, if you use anything except a 
Commodore printer (who doesn't?) you 
will need to change the ASCII code for £. 
The relevant code should appear in your 
printer handbook. 

I would strongly recommend that you 
purchase one of the "Accounting Made 
Easy" type books and have a good read 
before using this package. 

Until you have some grasp of the 
principles of double entry book-keeping 
you will have untold problems. Gemini 
advises that you approach your 
accountant prior to preparing profit & loss 
account and balance sheet - sounds like a 
good idea. 

Two particular aspects of the package 
are especially poor. 

Firstly, paraphrasing the section of the 
manual referring to data saving (I didn't 
have the nerve to test it) "if an error 
occurs while you are saving data, type 
GOTO 340 and try again" - how polished 
and professional can you get! When I was 
a green young programmer if I'd 
suggested to my project leader tht such a 
statement should appear in the operator's 
instructions, I would have been flayed 
alive with a wire brush. 

Secondly if you accidentally hit 
RUN/STOP and RESTORE simultaneously 
you automatically lose any data input 
during the session. 

I find it difficult to recommend 
Combination Business Pack No 1 as there 
are a number of better and cheaper 
alternatives. Gemini still has three 
important lessons to learn: Do more 
market research; when the "basic" ideas 
work - convert them to a faster medium 
such as machine code; employ good 
systems analysts and a technical author. 

Roll on No 2. 

The best part of this particular issue is 
the lovely lady who appears, smiling, on 
the front cover. If only someone would 
plug her C64 into the TV monitor for her. 
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2311 
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1700 
2314 

120353 
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320 
340 
1260 
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1301 
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121674 
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117039 
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116535 
116537 
116540 
116536 
116538 
116539 
120457 
103692 
103697 
108693 
121135 
115459 
115014 
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113101 
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2315 
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a prize worth £1000? 



Enter our competition and 



you could win one of 30 



(copies of our Game of the 



Month. 



IE 



The rules 

ENTRIES WILL NOT BE ACCEPTED FROM 
employees of Argus Specialist 
Publications, Wizard Development 
Company Ltd and Alabaster Passmore and 
Sons. This restriction also applies to 
employee's families and agents of the 
companies. 

The how to enter section forms part of 
the rules. The Editor's decision is final and 
no correspondence will be entered into. 

How to enter 

There are a few differences between the 
two pictures. Study them carefully and 
circle the differences on the picture 
attached to the coupon. Fill in the coupon 
clearly and seal the picture and coupon in 
an envelope. Write clearly the number of 
differences you found on the back of the 
envelope. 

Post your entry to: 
William Competition, Your Commodore, 
No 1 Golden Square, London W1R 3AB. 
The closing date is first post on Thursday, 
31st October 1985. You may enter as many 
times as you like but each entry must be 
on an official coupon - not a copy - and 
sealed in a separate envelope. 

Important: Please follow closely the 
guidelines on entering - incomplete 
coupons and entries with no numbers on 
the back cannot be considered. If you are 
a winner, the coupon will act as a label for 
your prize so clear writing is essential. 




Name . . 
Address 



Post code. 







Number of differences found 

Send to: William Competition, Your Commodore, No 1 Golden Square, 
London W1R 3AB. Write clearly and fully and don't forget to put the number 
of differences you found on the back of the envelope. 
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COLLINS - 
THE BEST IN COMPUTING BOOKS 




Nick Hampshire 

Commodore 64 ROMS 
Revealed 

Armed with this book any serious 
programmer of the Commodore 64 
will be able to make the fullest 
use of the machine's potential as 
well as providing a fascinating 
insight into the way it works. 
There is a full annotated assembly 
listing of the 64 ROM software 
and each routine is shown 
in detail. 

0 00 383087 X £8.95 
Order Form 

Please order from your local bookseller or send this form to 
Dept. 55. Collins Publishers. 8 Grafton Street. London WIX 3 LA 

Please send me copies of Commodore 64 ROMS Revealed 

0 00 383087 X £8.95 



enclose my remittance for £ 



(please add £ 1 .50 for first purchase plus 50p for each additional item) 

Name 

Address 



I Win inn! 



COMMODORE SOFTWARE SPECIALISTS 



Cu* Business 



CWG Result (Adv) by Handle 
Caic Result (Easy) by Handle 

im 



HOP 2U 



OFM Database by Dialog 
Practicaic II 

Super base 64 by Precision 
Su pei base Starter 
Superscript by Precision 
Triangle (Int. OB SS WP) 
Vlaiastar 64 XL4 
Forecaster - Project PlannervEntre- 
D'sion Maker* by Brainpower 1995 



H M 
49 95 
24 00 
69 95 
99 95 
39 95 
69 95 
19 95 
99 95 



3 M- T Games Special 
Commodore 0 Level S'iects 
Ffencti Mistress A S B 
German (L'nfcword)" 
Music Studio* NEW 
Story Machine (5-9yrs) 



Battle lor Normandy' 
F15 Strike Eagie* 
Fighier Pilot' 

Heathrow Air Traffic Clrol 
Interdictor Pilot* 
MIG Alley Ace" 

Skyfox NEW 
Sublogic Flight Stale* II 
Sublogic Flight Slate* II 
Theatre Europe 
747 Flight Simulator 



20 N 
9 95 
17.90 
12.95 
14 95 
9 95 



14 95 
14.95 
995 
7.95 
17.95 
1495 
12 95 
N M 
39 95 
95 
12/ 



Diary 64 by Hanc 
Doodle 
Jotpack Compiler' 
LOGO 

Machine Code Tutor 
Simon's Basic 
S-jpertype (Typing course} 
The Quill 



064 Hardivai 



Qulckshot 2 (Joystick) 
Supersketch" by Anlrog 
Voicemaster' by Anirog 



1995 
14.95 
14.96 
3495 
1495 
49.96 
19.95 
14.95 



85.00c 
39.75c 
20.45d 
59.950 
BS.OOd 
35.950 
59 95d 
17.50d 
89.00c 

17.50 



25.001 
8 '51 
14.501 
10.951 
12.75t 
8.501 



12.751 
12-75t 
8. SIX 
6.5C4 
14.951 
12.751 
IQWd 
44.95d 
35.95t 
B.5W 
10.451 




17.95c 
12.75d 
11.951 
29.95d 
12.751 
41.90c 
17.501 
11.851 



Borzak 
Dragonworld 

Fahrenheit 451 NEW 

Fourlh Protocol NEW 
Hobbd' 
Macbeth 

Murder on the W/lronf NEW 

Red Moon NEW 

Seven Cities o* Gold NEW 

Swiss Family Robinson NEW 

Tracer Sanction NEW 

Treasure Island NEW 

Ultima III NEW 



Archon' 

Blackwytch NEW 

Bndge 64 by Handic 

ELITE* 

Onost Chaser' NEW 

Q. Good's Test Cricket 

Gnbbiy s Day Out 

Match Fishing 

My Chess II* 

Nick Faldo's Golf 

Ouake-1 

Racing Destruction Set NEW 
Scrabble' 
Stealth 

Thing on a Soring 



A rwnl' 

Berks I. II and III 
Canoe Slalom 
Defence 16 
Psychedelia 
SjjlOeri 

Timesl.p 



19 95 
1995 
1295 
14.95 
14.95 
14.95 
696 
1496 
14.95 
1996 
14.95 
1995 



It 95 
996 

19.95 

14.95 
996 
9.95 
7.96 
7.96 

11.95 
9.96 
995 

14 95 



5.951 
18.00d 
18.000 
10.951 
11.851 
11.851 
12.751 
5.95t 
12.95d 
12.75d 



9.951 
8.50t 

17.95c 

12.751 
8.501 
8.501 
S501 
6.501 

10.501 
8 50t 
8.501 

12.95d 




VIC 20 (Jerie 



Football Managor 
1195 B.75 Sargon II Chess 
49 95 47.501 Music Composer 
59 95 57.401 Wizard and the Princess 



NEW 5.95 5.251 

9 96 8.95c 

24 95 21.00c 

NEW 5.95 5.451 



cassette 



Disc version available 



d - diskette C - ROM cartridge ' 

TLES AVAILABLE - ALL AT 

20 and CI 28 titles available - ALL i 
discounts to C64*" 
Please send stamp for our complete list, (state which computer), 
include 50p 'or Post and Packing lor all orders less than £20. Outside UK pit 
Include £1 plus 75p for each additional Item on all orders. Send Cheque. Eurocheque. 
Sterling money order of UK Postal Order with order to: 

DUNSTABLE SOFT CENTRE LTD (YC) d ^Table 

Beds LU6 2NP (0582) 607929 



IT MAKES 




SOUND LIKE 



Whether you want to play along to it, do demo's 
and record with It, sing along and dance to it or 
just enjoy programming It — The Syntron 
Digidrum - Get It! 

The Syntron Digidrum comes complete With a 
hardware user port connector, audio out, 
trigger out, easy to follow user's guide, 
software with the first eight digital 
samples Including Crash Cymbal, ^ 
Snare Drum, Bass Drum, Floor Tom, 




HI Tom, Med Tom, Open Hi Hat, 
Closed Hi Hat and programming 
functions. The software 
contains a complete set of 
demonstration patterns 
and songs - All this for 
just £85.00 Inc VAT 



SYNTRON DIGIDRUM 

The Syntron Digidrum is an exciting 
professional digital drumcomputer 
designed to operate with the 
Commodore 64. 

Using 'live' digital sound samples 
which are encoded onto software the 
user has a programmable drum 
machine with a sound quality many 
times the price. 

Easy visual grid programming, hear 
the sounds you enter, 51 patterns 
available in memory plus 10 songs 
linking 100 patterns together are 
possible with full copy, insert and 
delete functions. 





There is 
already a 
new sound sample 
set in preparation which 
will contain over 40 new 
samples including Syn Drums, 
Latin percussion, Hand Claps and 
many more for only £16.50! All purchasers 
of the'Syntron Digidrum will receive details 
of the new sound samples as they become 
availablelplus a FREE subscription to the SYNDROMIC 
USERBASE which includes a membership card and a FREE 
quarterly newspape^on computer music and computer 
musicians written by leading music and computer journalists. 

Please fill out and return the coupon below. 



THE BBIG BBBLACK BEAT BBBOX 



would like further information 
on the Syntron Digidrum 



I would like to order my Syntron 
Dlgidrum(s) 



' NAME 

ADDRESS 



—■• i .....> 



Syntron Digidrum — Disk version @ £65.00 Inc. VAT 

— Cassette version @ £65.00 Inc. VAT 

Please add £2.50 for packaging/postage/insurance. 

I enclose a cheque/postal order - made payable to SYNDROMIC MUSIC - to the value 
of £ 

All orders should be sent to SYNDROMIC MUSIC, 35A Grove Avenue, London. N10 2AS 

SYNDROMIC MUSIC GUARANTEE 

Not to Bank your monies until the Goods are ready for Dispatch. 

Please allow 21 days for delivery YC1 dig) ever hear such a sound? 



For help with Readingand Writing 

^01-405 4017 



Since 1975, 350,0001 
adults have been 
helped to read and 

write better. 
If you want help look 
for this 
.sign. 



For further information 
Adult Literacy & Bask Skills Unit 
PO Box 213 London WC1V 7ET 



"Chess game it is not!" Your Computer 

THE CHESS GAME 

Commodore 64 - Now Available - RRP £7.95 

if Lewis Carroll had written a computer program 
then this would be it." Home Computing Weekly 

"Brilliantly designed opening screen . . . 
Perspective animation and sprite design are 
excellent ... A very clever and original program." 
Commodore Horizons 

"Excellent 3D graphics . . . Top Notch." 
Commodore Computing International 

'I strongly recommend this game whether you 
understand chess or not." Home Computer Weekly 

'An arcade extravaganza from MicroClassic." 
Your 64 

THE FIVE STAR REVIEWS CONTINUE . . . 

Home Computer Weekly - Commodore Show 
Products Review Week - The chess game rated top 
game - Popular Computing Weekly - Rated equal 
top for week - Commodore Horizons - Top two 
best game - top graphics - Commodore Com- 
puting International - Five star graphics - 

PRIORITY ORDER SERVICE 

If your dealer has sold our, simply send 
us a cheque or postal order for £7.95 and 
we will rush you a copy by 1st class post 

LASSIC, GREENFIELDS, PRIORY ROAD, 
FOREST ROW, SUSSEX 




Electronic Aids Oewkesbury) Ltd. 

Accounting and Educational Software 

For Commodore 64 and 128 
SALES LEDGER with invoicing £98.00 + VAT 
Invoices laid out to your own design, statements, aged analysis, 
daybook, period and VAT report, label printing etc. etc. 

FINAL ACCOUNTS £60.00 + VAT 

Nominal ledger with inputs for sales, purchases, cash and 
journals, allows you to structure your own reports e.g. profit & 
loss, balance sheet, department report etc. Complete audio trail, 
trial balance, opening balances, last month's trial balance, 
monthly totals on all accounts etc. 

PURCHASE LEDGER £69.00 + VAT 

Sales ledger, purchase ledger and final accounts (as above) all 
combined into one integrated package. 

INTEGRATED ACCOUNTS £195.00 + VAT 

Sales ledger, purchase ledger and final accounts (as above) all 
combined into one integrated package. 

SEVENPACK £45.22 + VAT 

A simple integrated package for very small businesses. Purchase 
& Sales Control, invoicing, simple nominal ledger, statements, 
ordinary stock control, stock control for car parts and address 

label printing. 

PAYROLL with new Nl rules £99.50 + VAT 

Easy to use, but allows 7 overtime/piecework rates. 4 pre-tax 
adjustments incl. SSP, 6 after-tax adjustments, deduction card, 
coinage analysis etc. 

ELECTRONIC AIDS LTD. 
62 High Street, EVESHAM, 

Worcs. WR11 4HG 

Phone 0386 - 49339 

Money back on any Item returned within 21 day*. 



a spreadsheet, 

VIZASTAR 64 , «&b 

PACKAGE... AT AN AMAZINGLY AFFORDABLE PRICE! THE LATEST DESIGN TECHNI0UES 
COMBINE ULTIMATE EASE-OF-USC. WITH ALL THE SOPHISTICATION OF AN ItnCGftAJp 
PRODUCT... ADVANCED SPREADSHEET FEATURES INCLUDE HIGH-SPEED MATHS FUNCTIONS, 
1000 BY 64 WORKSHEET. FROGRAMMA0IL1TY. WINDOWS, CELL PROTECTION. SEARCH AND 
SORT. TEXT EDITING. WCPDPR0CESS0R COMPATIBILITY, SIMUITA'COUS GRAPHICS... 
INTEGRATED WITH A 10CO-CHARACTER PER RECORD DATABASE, UP TO 250 CHARACTERS 
PTB ITEM... THE ONLY PRODUCT OF ITS KIND FOR THE COMMODORE 64! SUITS MOST 
PRINTERS. SUPPLIED WITH EXCELLENT HANMOOX. ^ m] „ m ^ £89.00 



YOUR PROGRAMS 
.— iWliM WILL REALLY 
Q f TAKE OFF WITH 

DTL XTPACK 64! 1003 COMPATIBLE WITH 
CBM BASIC. XTPACX COMPILES BASIC 
PROGRAMS INTO MACHINE CODE. RUNNING 
UP TO 25 TIMES FASTER... AND USING 
UP TO HALF AS MUCH MEMORY. TO GIVE 
FASTER LOADING, OR BIGGER PROGRAMS! 
AND IT EVEN ACCEPTS BASIC EXTENSIONS 
AND MACHINE CODE ROUTINES AS WELL! 

Og.PttJ.tt tPI$K> »S,95 



c7VIaster64 



HAS EVERYTHING 
YOJ NEED FOR 
PROGRAMMING TO 
TOP PROFESSIONAL STANDARDS! EWSIC IV, 
MACHINE CODE MONITOR. AND 85 POWERFUL 
NEW COMMANDS. . . INCLUDING TOOLKIT. 
BUSINESS BASIC. KEYED ACCESS FILES, 
DISK DATA COMPRESSION, FORMA TTAE'LE 
SCREEN ZONES. MULTIPLE SCREENS. DATE 
CONTROL. REPORT GENERATOR, 22 -PL ACE 
ARITHMETIC. SCREEN PLOT. SCREEN DUMP, 
AND MORE... 



VlZAtftlTE 64 IS A HIGH-PERFORMANCE , 
LOW-COST WORD PROCESSOR WITH ON-SCREEN 
FORMATTING. THAT TAKES FULL ADVANTAGE 
OF THE 64'S COLOUR, GRAPHICS AND MEMORY FEATURES... AND SUPPORTS VIRTUALLY 
ANY PRINTER! WITH A COMPREHENSIVE AND EASY-TO-FOLLOW USER REFERENCE MANUW.. 



VIZAWRITE 64 



VIZASTAR 
VIZASPELL 
EASY SCRIPT 
EAS'SPELL 
SIMON'S BASIC 
FI&ARO 64 


(DISK) I9MS 189. DC 
(DISK) I54rtt J49.9S 
(DISK) t7*rM 165. OC 
(DISK) ISOtOO 1*1.9! 
(CART) iSOrOO 141.9! 
(DISK) IBtrfS 175. 0( 


HULTIPLAN (US) (OtSK) UWS 167.95 
PRACTICALC (DISK) U*rfO 139.95 

1 PRACTICALC (TAPE) UWS 134.95 
HONE BASE 1-4 (SUPER BASE ) 117.95 
STEPPING STONES (SUPERBASE) 19.95 

1 PRINTLINK 64 (INTERFACE) 139.95 


PRICES INCLUDE 1S1 VAT AN0 ARE 
CORRECT ON GOING TO PRESS. 
ORDER BY POST OR PHONE. USING 
CHEQ1*. ACCESS/BARCLAY CARD OR 
OFFICIAL ORDER. DESPATCH IS BY 
SW-CAt 1ST CLASS POST, PRE- 
PAID OflDfRS FAEC. PRODUCT DATA 
AVAILABLE ON REQUEST. REF AM 
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LAKESIDE HOUSE. KINGSTON HILL. SURREY. KT2 701. TEL 01-544-7256 




Languages 



Fed up with the speed of 



Basic? 



Do you find machine code 



too complicated? 



David Janda takes a look at 




FORTH IS A REMARKABLE LANGUAGE. 
Not only is it the fastest language available 
for home micros, but it is also very easy to 
implement. Just about everything is 
unique to this language, and many people 
have used it for various applications. 

To get an idea of Forth it is worth 
looking at its history. Forth was developed 
in the late 60s by one man called Charles H 
Moore. Moore was working at the 
National Radio Astronomy in Kitt Peak 
Arizona, and was very frustrated with the 
limitations of existing programming 
languages. 

Over the years, Moore developed a set 
of programming tools which he could add 
to when he pleased. He decided to 
develop his tools into a control language, 
and Forth was borne. Since then, there 
have been numerous versions of the 
language, but basically the choice is 
between two Forth-77 and Fig-Forth. 

The first point to note about Forth is 
that it doesn't use instructions or 
commands like Basic. Neither is it 
restricted to the number of facilities 
it possesses when purchased. Instead, 
Forth uses words. Every version comes 
with a set of words that make up the 
nucleus of the language. 

The set of Forth words is stored in what 
is called the dictionary, just like Basic (but 
more flexible) a Forth program can 
consists of any number or combination of 
words. VLISTisaForth word. Its purpose is 
to display the contents of the dictionary. 
About the only other similarity between 
Basic and Forth is that the latter has an 
immediate mode where single commands 
(sorry, words) can be executed. For larger 
programs, an editor of some sort is used to 
enter the source code. 

The real reason why Forth stands head 
and shoulders above the rest is its facility 
to allow the user to add to it. The analogy 
of someone opening a door will 
demonstrate this point as well as show the 
structure of a Forth program: 

: GRASP GRASP HANDLE; 

: TURN TURN HANDLE ; 

: OPEN PULL DOOR TOWARDS YOU ; 

: ENTER WALK THROUGH ; 

: DOOR GRASP TURN OPEN ENTER ; 




In this example, there are four words, 
grasp, turn, open and enter. Each new 
word consists of a number of Forth words 
which are terminated by the semi-colon. 
Finally, a word called DOOR has been 
defined which consists of the other 
four words. So, to perform the four words 
I would simply enter DOOR. 

The Stack 

Forth has been described by many as the 
high-level low-level language. The reason 
for this is because Forth offers such high- 
level control structures, yet requires the 
user to maintain the stack. As a matter of 
fact, the stack (and understanding how to 
manipulate it) is probably the single most 
important aspect of learning the 
language. 

The reason for this is because 
practically every Forth word alters the 
contents of the stack in some way. So it is 
entirely up to the user to maintain the 
stack, as there is no error checking, bound 
checking or such like. Even though it is a 
difficult concept to handle at first, stack 
manipulation does have its rewards. In 
Forth's case it produces programs that can 
run at 80% of the speed of machine code 
programs! 

The stack itself is an area of memory 
that is used as a temporary storage space 
for numbers, data, and such like. It 
operates on a first-in last-out basis, and 
numbers can be added to it (pushed) or 
removed (popped). 



To put the number six on the stack in 
Forth in immediate mode, the following is 
done: 

6 RETURN 

This places six on the stack. Adding more 
words is simple: 

5 2 9 34 21 RETURN 

Removing the numbers from the stack 
can be done in a number of ways. By far 
the simplest is to print them, and thii is 
done with the dot command',', which 
removes one item from the stack and 
displays it: 

RETURN 

would print: 



21 

34 

9 

2 

5 

6 



The reason for the 'backwardsness' is 
because the first number placed on the 
stack will be at the bottom, and hence the 
last out. 

The two methods of placing numbers 
on the stack are in the immediate mode 
(as above), or within a colon definition (a 
program). Here, a word called ADD has 



been defined which adds two and seven 
and prints the result: 



: ADD 2 7 + . 



By simply entering ADD, the number nine 
will be displayed. This is not a very good 
way to add two numbers, so like Basic, 
Forth can get the two numbers at run- 
time: 

: ADD + . ; 

To add two numbers the following is 
entered: 

2 5 ADD 
7 Ok 

Notice the 'ok' which is the equivalent of 
Basic's Ready prompt. 

Reverse Polish Notation 

Forth requires that numbers to be 
operated upon should be on the stack 
prior to the operator. In other words, to 
perform a mathematical function, it is 
necessary to place the operand(s) before 
the operator(s), and not mix them as we 
humans do: 

3 7 + is the equivalent of 3 + 7 

We humans perform our calculations in 
infix notation, but Forth does it in postfix 
notation, known as reverse polish 
notation. Here are some algerbraic 
expressions in infix notation (normal) 
with their postfix (Forth) equivalents: 
Normal Forth 
A+B-C A B + C - 

(+B)*C AB+C* 
A*B-C/d+E A B * C D / - E + 

It looks confusing at first, but it is 
surprising how easy it is to adapt. 

The reason why postfix notation is 
used is because computers find it easier. 
As a result, this also contributes to Forth's 
speed. 

Definitions 

In Basic programs words are written, but 
in Forth words are defined. To inform the 
micro that you are defining a Forth word, 
two Forth words ':' and ';' are used 
together with a name for that word: 

: name forth-words; 

Once the definition is entered, it is placed 
within the dictionary and can be used just 
like any other Forth word. Other Forth 
words could use other definitions. 

One of the great advantages that Forth 
has over conventional procedure librarys 
is that it is possible with many versions of 
Forth to inform the package that you wish 
to make your words part of the language 




itself. Thus the next time you load Forth 
your own defined words will be part of 
the language! 

Finally, the following Basic Forth 
speed comparison demonstrates the 
speed of Forth. The two programs are 
identical in operation, and perform the 
following: 

Clear the text screen 

Fill the colour map with the value 1, i.e. 

white. 

POKE to the screen display 26 complete 
screenfuls. 

The result is that a screenful of A's will be 
displayed, then B's and so on. In BASIC 
the test took 115 seconds to complete, 
and in (Melbourne) Forth it took 10.23 
seconds! 

10 PRINT "(CLSJ" 

20 FOR C=552% TO 56296 

30 POKE C,l 

40 NEXT C 

50 FOR L=1 TO 26 

60 FOR 1=1024 TO 2039 

70 POKE l,L 

80 NEXT I 

90 NEXT L 

: BM1 CLS 

56297 55296 DO 
1 I C! 
LOOP 
27 P DO 
2040 1024 DO 
J I C! 
LOOP 
LLOP ; 



Reviews 

It is very easy to implement Forth on a 
micro-especially one like the 64. As a 
result, there are at least seven implemen- 
tations of the language available in the 
UK. 

As you can see from the list, the prices 
of Forth packages differ. The features 
offered also vary, and it is a good idea to 
think about why you need the package. If, 
for example, you wish to expand an 
existing Forth, with a no-frills package, 
then Fig-Forth could be what you are 
looking for. On the other hand. White 
Lightning from Oasis Software offers 
many extensions. Another very good 
version is Forth* from Melbourne House. 
With this package it is possible to produce 
your own stand-alone programs with 
ease. 

Reviewed here are just four of the 



Fig-Forth 
Romilc Software 
Tape only -£14.95 

Although this version is one of the 
cheapest, and offers no 'extras' at all, it is a 
great package! 

This is because of the way in which the 
package has been implemented. Romik 
Forth offers the user a true fig-Forth 
environment without any additions of any 
kind. This has its advantages. First, it leaves 
memory free that would otherwise be 
used for extensions that the user may not 
want in the first place. And secondly, the 




Languages 



user can expand and customise the 
package without having to worry about 
workspace that may be used by 
extensions. 

This said, I wouldn't recommend 
Romik Forth for the absolute beginner. 
Forth is unfriendly by nature, and Romik's 
version, an exact implementation, reflects 
this! 

In use, the Romik Forth proved very 
fast, even compared with other Forths. 
The only slow aspect was the screen 
output. I believe the authors have made a 
CALL to the Basic/kernal ROMS and used 
the same routines as Basic for screen 
output. This is a pity, as it is possible to 
optimise this routine, thus speeding it up. 

Being an accurate implementation of 
Fig-Forth, Romik Forth uses the same 
editor as most Forths - and a horrible 
editor it is too! 

When Forth was designed, no method 
was specified for inputting source code. A 
US member of the Forth Interest Group 
(hence Fig) designed a crude but practical 
line editor, published in the user groups 
newsletter. The author suggested it 
should be used until someone designed a 
better one. Unfortunately, everyone 
(including the software houses) decided 
to use it, and it's still being copied in Forth 
implementations today! 



Forth-64 
Audiogenic 
Cartridge only— £29.95 

The standard editor used in Fig-Forth 
is not the only 'off-putter' about the 
language. SAVEing and LOADing to and 
from a backup device is also complicated. 

However, in this case, there is a 
justified reason. Forth was designed to use 
dynamic storage meaning that memory is 
treated as the backup device. The idea 
behind this is to speed-up SAVEing and 
LOADing. Only when you physically wish 
to store or LOAD the data (at the start or 
end of an editing session perhaps) would 
you FLUSH the data to disk or tape. In 
other words, dynamic store is a go- 
between the memory and tape/disk. 

But managing the Ramdisk is a tricky 
business in standard Forth. Audiogenics 
forth-64 gets round this problem by 
offering easy to use Forth words for saving 
and loading program screens. Not only 
that, but the IEEE bus is fully supported, so 
it is possible to control (with some ease) 
any device bolted on the back of the 64. 

Audiogenic's Forth is supplied on 
cartridge thus SAVEing the user the 
drudgery of LOADing from tape to disk. 
Not only that, but being on cartridge frees 
memory for more source screens which is 
quite important. 

Numerous words cover tape/disk I/O 
and the IEEE bus, but there are no graphic 
or sound extensions on the 64 version. But 
it should be noted that the Vic-20 version 



does have a word forchangingthe border 
and screen colour as well as loading the 
sound registers. 

The editor used in this version is based 
around the original, but makes good use 
of the Commodore function/cursor keys. 
What is a bit unusual is that the screen 
used for direct mode is a Forth editing 
screen. This means that when the end of 
the screen is reached, it is necessary to 
clear it before continuing. This is quite 
awkward, and takes away some of the 
immediacy of direct execution. 

However, screen (as in editing) 
management is very well organised with a 
lot of the mundane tasks being done 
automatically. A screen is selected, and 
after the program source has been edited, 
it can be loaded into main memory and 
run. To actually save or load a number of 
source screens, a file is specified in the 
SSAVE/SLOAD command, and Forth will 
save or load the required number of 
blocks - simple! 

White Lightning 
Oasis Software 
Tape-£19.95, disk-£29.95 

White Lightning is quite simply the best 
value for money you can get. For the 
price, you not only get a good 
implementation of Fig-Forth, but you also 
get a graphics development system. 

White Lightning is a fairly complex 
package that can be used to develop 
commercial programs. The package is 
Forth based and includes a Fig-Forth 
nucleus. Built around this is a graphics 
development shell called IDEAL which 
contains numerous sprite and sound 
words which are used in the Forth 
program. As well as this, it is possible to 
access Basic within a White Lightning or 
machine code. Once the program has 
been developed and debugged, it is 
possible to save it in a stand alone version 
that can be freely distributed. 

Both disk and tape versions are 
available, but the 'serious' programmer 
should opt for the disk version as it is 
necessary to save and load sprite data as 
well as the Forth source if a graphics 
program is being developed. 

As mentioned it is possible to include 
Basic statements within the Forth source. 
This will mean that the program will not 
run as fast as it would in Forth only, but it is 
a great help when starting off with the 
language. 

FORTH+ 

Melbourne House 
Tape— £14.95 

Although only recently released, Forth+ 
has a long and interesting history. This Fig- 
Forth based package was initially 
developed for the ZX Spectrum by 
Abbersoft. 



Forth* is supplied on cassette which is 
recorded in the Pavlova format and takes 
under three minutes to load. Disk users 
will be relieved to hear that the package 
can be transferred to disk with just two 
simple commands. Once saved to disk, 
the package takes 40 seconds to load and 
uses the disk as the main backing device. 

Supplied with the cassette is a (grotty) 
36 page manual which covers the bare 
essentials of the package. There are a 
number of features within the package 
that are not documented in the manual, 
but I understand that Melbourne House 
will be releasing a full length manual in 
the near future. 

Forth* is based around Fig-Forth and 
offers a number of interesting extensions. 
First, the screen editor has been adapted 
to make use of the C64's editor. Source 
code can be entered into any of the nine 
screens in a free format, and an edit 
session can be aborted if desired. One 
point missing from the editor is the ability 
to delete carriage returns. This may not 
sound important, but when editing in a 
free format (such as the example 
program) this becomes essential. 

Another interesting feature is the 
ability to produce stand-alone programs 
with the package. After your masterpiece 
is created, ZAP followed by the name of 
the word will save a machine code file 
which can be SYSed from Basic. However, 
the code that is saved is as large as the 
Forth itself (50 blocks), and probably 
contains most of the package. There are 
more elegant methods of achieving the 
same thing. 

Screen modes included within the 
package are: 

MCM Multi-colour mode 

NCM Normal colour mode 

ECBM Extended background colour 

mode 

NBCM Normal background colour mode 
HRG High-res mode 
LRG Low-res mode 

All the normal colour functions such as 
border, ink and background are 
supported, together with plot and draw. 
Sixteen sprite commands are included as 
well as 16 sound commands. 

In use, Forth+ proved to be excellent. 
Even a semi-fatal crash could be re- 
covered from re-SYSing back into the 
main code. The pakcage is not 
overwhelmed with features, but the 
facilities which it does have are perfectly 
adequate. 



Other Forth Packages 

There are numerous versions of FORTH 
available, and here is a list of some: 
Forth 64 Handic Software £34.95 
Forth 64 Hesware £54.95 
Tiny-Forth Adamsoft £12.95, £14.95 




Nick Hampshire brings you a 



detailed look at the C-16 



Operating System variables 



and memory map. 




ONE WISHING TO DO EXTENSIVE 
ine code programming on the C-16 
fus-4 will require two essential pieces 
mation. 

first, is a list of the operating 
system variables, their location and 
function. This is essential if fatal interac- 
tion with the system software is not to 
occur. It is also important to know where 
to place variables when using any of the 
system subroutines. 

The second essential piece of informa- 
tion is a memory map. This contains the 
entry points to the operating system and 
Basic ROM routines. The use of such 
routines within a program can save a 
considerable amount of time and 
program space, an important considera- 
tion with the C-16. 

I have included both these pieces of 
information in this article. 

Unfortunately, Commodore has not 
previously produced any of this data and 
it has therefore been necessary to use the 
experience gained with previous 
Commodore machines to deduce the 
location and function of both variables 
and routines. All the locations discovered 
have been thoroughly checked and I have 
no reason to doubt that they are correct, I 
would however be very interested to hear 
from any readers with additional 
information. 

The operating system variables are, in 
common with all Commodore machines, 
stored in the bottom area of memory 
extending from location $0000 up to the 
bottom of the screen colour memory at 
$0800, a total of 2K of memory. All tl 
important variable locations are shown in 
Table 1. It should be noted that locations 
$00 and $01 are an I/O port located on the 
processor chip and cannot therefore be 
used for variable storage. 

A memory map of the ROM based 
operating system and Basic routines is 
shown in Table 2. Many of these routines 
are usable to some degree, and some are 
extremely valuable. Most of the routines 
and variables are similar, or even 
identical, in function, if not in location, to 

|hn«» an ihi> C6A 



Readers wishing to gain an in depth 
knowledge of the routines, functions and 
operations are recommended to consult 
one of the advanced books on the 64. The 
64 Revealed series by Nick Hampshire, 
published by Collins is recommended, 
especially Advanced Commodore 64 
Basic Revealed. 



NUTS & BOLTS 

OF THE 

C/16 




Operating system variable storage. 

:============ 



0801 



Bit 



000R 
000D 
000E 
000F 

0014-0015 
0016 

0017-0018 

0019-0021 

0022-0825 
0026-002A 
©02E-002C 
002D-082E 

002F-0030 

0031-0032 
0033-0034 
0035-0036 
0037-0038 
0039-003A 
003B-003C 
003D-003E 

003F-0040 

0041-0042 
0043-0044 
0045-0046 
0047-0048 
0049-004R 
004B-004C 
004D 

004E-0053 
0854-0856 

0057-0060 
0061 

0062-0065 

0066 

0067 



■ Cassette control 
4 : Cassette read 

3 : Cassette motor C0=on> 
1 : Cassette write 

■ 0=LOAD,1=VERIFV 

■ Tyr>e : FF=strin«^00=numeric 

■ Type : 80=intesier,00=f loating 

- DATA scan/LIST ctuote/memory flag 

■ Integer value 

- Pointer : temporary string stack 

- Last temp string vector 

- Temporary string stack 

■ Utility pointer area 

- Prooduct area -for multiplication 

- Pointer 1 start of Basic 

■ Pointer : start of Basic variables 

- Pointer ; start of arrays 

• Pointer: end o-f arrays 

- Pointer : bottom of strings 

- Pointer : current string 

■ Pointer -top of Basic memory 

■ Current Basic line number 

■ CHflRGET Pointer 

- Pointer : FOR/DO stack 

- Current DATA line number 

■ Current BflTfl address 

■ Input vector 

■ Current variable name 

■ Current variable address 

■ Variable Pointer for FOR/NEXT 

• V save; op save; Basic ppo inter save 
Comparison symbol accumulator 
Mis© numeric work area 

■ Jump vector for functions 

■ Mi so work area 

- FRC#1 exponent 

■ FAC#1 mantissa 

- FflC#l sign 

■ Series evaluation constant pointer 



CI 6 Special 



0068 

0069-006E 
006F 

0070 

0075 

007C-007D 
00S3 

0030 
0091 

0093 
0094 
0095 
0037 
0093 
8099 

009fl 

003D-003E 
00H3-00R5 
00R6 

00flR 

mm 

00RC 

OGFlD 
90RE 
00AF- 
00E2- 
00E4 
00B6 
08C4- 
80C6 
00C7 

00C8 
00CR 

00CB 
00CD 
O0CE 
00CF 

60EA-00EB - 
00EC-06ED - 
OOEF 
OOFS 

0OFF-O1OR - 
O100-013E - 

O100-01FF - 

0200-0253 - 

0259-025R - 

O25E-025C - 

02F2-62F3 - 



■00B0 

■00B3 
■00E5 
■00E7 
■00C5 



-00C9 - 



02F4- 

0300" 



■02F5 
•6311 



FRC#1 overflow 
FRC#2 

FRC sign comparison 
FRC#1 rounding 
Room -for graphics screen 
(0=not available) 
Po i nter = GQSUB stack 
Flag for window ($4@=window on; 
$80=mu Itico lour, $C@=both 
Status word ST 

Keys-uitch Clfl-STOP and RVS f lags 
0= load.. 1= verify 

Serial output : deferred char- f lag 
Serial deferred character 

# open f i les 
In^ut device 
Output CMD device 
Direct=80/run=0 output control 
Tape end address/End of program 
Jiffy clock 

Serial bit count/EOI flag 
Countdown tape write/bit count 

# chars in f i lename 
logical f i le 
secondary address 
dev i ce 
to f i lename 

address 

address £ load/ verify) 




Current 
Current 
Current 
Pointer 
I/O start 
Rlt start 



Po i nter ' cassette buffer 

Input cursor log < row* column) 

Which key ; 64=no key 

Input from screen/keyboard 

Pointer to screen line 

Po i nter : cursor co lumn 

Output ecuotes flag 

Pointer : cursor row 

Output character Cto screen) 

# of inserts outstanding 
Screen colour pointer 
Keyboard po i nter 

# chars in keyboard buffer- 
Type of tape f i le 
Floating to ASCII work area 
Tape error log 
Processor stack area 
Basic input buffer 
Pointer^ line# for CONT 
Pointer: Basic statement for CONT 
F loat-f i xed vector 

F i xed-f loat vector 
Basic vectors 




0312-9313 - 
O314-0315 - 

0316-9317 - 
0318-0319 - 
03ifi-03lB - 
031C-031D - 
031E-031F - 
0320-0321 - 

0322- 0323 - 
0324-0325 - 
0326-0327 - 

0323- 0329 - 
032R-032B - 
032C-032P - 
032E-032F - 
0330-0331 - 
0333-03F2 - 
0473 

04FC/04FE - 
O4FD/04FF - 
0563 

0509-0512 - 
051 3-051 C - 
051H-0526 - 
0527-0530 - 
0531-0532 - 
0533-0534 - 
0535 
053E 

Bit 
6- 



3- 



053F 
0541 
0542 
0543 
0544 

0545-0546 
0547 

0700-07B0 

07F2 
07F3 
07F4 
07F5 
07F6 
07FD 

0S00-0BFF 
0C00-0FFF 
1000-3FF5 
1S00-3FF5 
3FF6-3FFB 



IRQ vector ■for keyscan/c lock 
Main IRQ vector for 

sound duration/graphics split 
BRK interrupt vector 
OPEN vector 
CLOSE vector 
Set input vector- 
Set output vector 
Restore I/O vector 
INPUT vector 
Output vector 
Test-STOP vector 
GET vector 
Abort I/O vector 
User vector 

LOAD vector 
SAVE vector 
Cassette buffer 
CHflRGET sutar out i ne 
Duration -for voice 1 
Duration -for voice 2/noise 
RND seed value 
Logical file tab le 
Device # table 
Secondary address table 
Keyboard buffer 
Start of usable memory 
End of usable memory 
Serial bus timeout flan 
Current colour code 
7 - l=flash 

4 : luminance (8*-7> 
0 : colour (0-15) 
Maximum size of keyboard buffer- 
Repeat speed counter 
Repeat delay counter 
Keyboard shift/control flan 
Case switch count 
Keyboard table setup pointer 
Case switch disable 
Gosub stack 
SVS fl res* save 
SVS X res* save 
SVS V res save 
SVS status res* save 
Last key 

Countdown for double TI bump 

Colour memory 

Screen memory 

Basic Program memory 

Graphics screen/colour memory 

Reset entry (when ROM is out) 
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Commodore 16 Memory Map. 



8008 

8919 

80CC 

8105 

811? 

8123 

81 8E 

8383 

8415 

8453 

8471 

8681 

8683 

8793 

870F 

8fl3D 

8A79 

8A98 

8AF1 

8RFF 

SBBC 

8C9A 

8CD3 

SCDfl 

8D03 

8D2C 

8D4D 

8D83 

8DB0 

8DE1 

8E0E 

8E1B 

8E3E 

8E7C 

8FE0 

8FE6 

9000 

9088 
90B8 
96EE 
9168 
91 4F 
920B 
9294 
932C 
9439 
9465 
948B 
948E 
9491 
95F8 
95FB 
9628 
969B 
96A5 



Basic ROM cold start routine 

Initialize Basic 
Power-too message 
vectors -for $8300 
Initialize vectors 
CHRGET -for $9479 
Keywords 
Command vectors 
Function vectors 
Arithmetic operator vectors 
Error messages 
'SVNTRX ERROR' 
Error routine 
'RE ADV. ' 

Basic warm start 
Find Basic line 
Perform 'NEW 
Perform 'CLR' 
Set text pointer 
Perform 'LIST' 
'RUN' 
'RESTORE' 
'STOP' 
'END' 
'CONT' 
'GOSUE' 
'GOTO' 
'RETURN' 
'DATA' 
'IF' 

'REM' and 'ELSE' 
'ON' 

Get line number <0-63999> 
Perform 
Perform 
Perform 'CMD' 
Perform 'PRINT' 
Print string from <y. a> 
Perform 'GET' 
Perform 'INPUT*' 
Perform 'INPUT' 
Perform 'READ' 
'?REDO FROM START' message 
Perform 'NEXT' 
Evaluate expression 
Constant - Pi 
Perform 'NOT' 
Scan Past ')' 
Scan Past '<' 

Scan Past ' > ' 
Perform 'OR' 
Perform 'AND' 
Perform comparisons <<=>> 
Perform 'DIM' 
Locate variable 



Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 



'LET' 
'PRINT*' 



986C 
9386 
9A62 
9A7D 
9A9D 
9ADE 
9B66 
9C48 
9CBB 
9CCF 
9D03 
9D15 
9D61 
9D70 
9D84 
9D93 
9DB2 
9DFA 
9E12 
9E6A 
9E87 
9E9E 
AOIE 
A07B 
A197 
A221 
A281 
A2A0 
A2BE 
A2DD 
A35S 
A5E4 
R5EE 
A627 
A666 
A707 
A77D 
A7S5 
A78B 
A791 
A797 



A7A6 - 

A7AF - 
A7B5 - 
A7DE - 
A7F8 - 
A7F3 - 
A84D - 
A85A - 
AS6B - 
A8B0 - 
A954 - 
AA70 - 
AA77 - 
AAC0 - 
AB1A - 



Constant - 32768 
Float-fixed 
Perform 'FRE' 

Perform 
Perform 
Perform 
Perform 



'POS' 
'DEF' 
'FN' 
'STR$' 



- Get temporary string 



Perform 
Perform 
Perform 
Perform 
Perform 
Perform 



'CHR$' 
'LEFTS' 
'RIGHTS' 
'MID*' 
'LEN' 
'ASC 

Get 1 byte parameter- 
Perform 'VAL' 

Get Parameters for POKE/WAIT 
Perform 
Perform 
Perform 'WAIT' 

'subtract' 
'add' 
'LOG' 

'multiply' 
'divide' 



'PEEK' 
'POKE' 



Perform 
Perform 
Perform 
Perform 
Perform 



Memory to FAC#1 
FAC#2 to FAC#1 
Round FAC#1 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 'RND 



'SON' 
'ABS' 
'INT' 
'SQR' 
'power' 
'negate' 
'EXP' 



7D - Basic I/O error handler 



patch 
patch 
patch 
patch 



for 
for 
for 
for 



OPEN 
PRINT 
INPUT 
set 



Basic-kernal 
Basic-kernal 
Easic-kernal 
Basic-kernal 
output device 

Basic-l<ernal Patch for set 
input device 

Basic-kernal patch for GET 
Perform 
Perform 

'VERIFV 
'LOAD' 
'OPEN' 
'CLOSE' 

for LOAD/SAVE 
for OPEN/CLOSE 



'SVS' 
'SAVE' 



Perform 
Perform 
Perform 
Perform 
Get parameters 
Get parameters 



Garbage 
Perform 
Perform 
Perform 
Perform 



co I lect 

'COS' 

'SIN' 

'TAN' 

'ATN' 



_ 








. 










EZ 




cz 




1= 


cz 






nz 



C1 6 Special 




Table 2 (continued) 



RB8B 
ABCA 
flESfl 
AECA 

B42B 

B448 

B544 

B557 

E5AC 

B603 

B652 

B655 

B6CD 

B6E8 

B729 

B849 

B8BD 

B8D1 

B9D4 

BAE2 

BB35 

BE29 

C61E 

C4D9 

C50D 

C51A 

C56? 

C5BS 

C5C3 

C8BC 

C94l 

C95l 

C96S 

C99C 

C9CC 

C9DA 

C9F4 

cam 

CB21 
CCCF 
£332 



Perform 'RENUMBER' 

Perform 'FOR' 

Perform 'DELETE' 

Get ranse for LIST/DELETE 

Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 
Perform 



'TRAP' 

'RESUME' 

'PUDEF' 

'BO' 

'EXIT' 

'LOOP' 

'TRON' 

'TROF' 

'AUTO' 

'HELP' 

'KEV 

'SOUND' 

'VOL' 

'PAINT' 

'CHAR' 

'BOX' 

'GSHRPE ' 

'SSHflPE 

'CIRCLE' 



'DRRW 
'LOCATE' 
'COLOR' 
'SCNCLR' 
'SCALE' 
'GRAPHIC 
'DIRECTORS'" 
'DSRVE' 
'DLOAD' 
'HEADER' 
'SCRATCH' 
'COLLECT" 
'COPV 
'RENAME" 
"BACKUP' 

- Get paramters for disk commands 

- Read disk error 

- 'ARE VOU SURE?' message 



CE80 - IRQ/BRK entry 

CE0E - IRQ routine C«0314) - handles 

graphics splits sound duration 

CE42 - IRQ routine <$03l2> - handles 



CECD - 
CEFS - 
CF26 - 
CF2D - 
D000 - 
D802 - 
D81B - 
D834 - 
DS39 - 
D8A8 - 
D8C1 - 



c lock f keyboard 
Handle sound durations 
Bump clock 
Get time 
Set time 

Character definitions (2K> 
Screen address low 
Screen address high 
Get screen size 

Put/set rom/co tunti 
Set screen pointers 
Remove char" from keyboard 



B965 - 
DBll - 
DC49 - 
EOIE - 
E026 - 
E067 - 
E0R8 - 
E0E9 - 
E12A - 
E2EA - 
E9CC - 
EA21 - 
EBD9 - 
EBE8 - 
EC4B - 
EC8B - 
ECDF - 
ED18 - 
ED60 - 
EDFfi - 
EElfl - 
EE2C - 
EE4D - 
EE5D - 
EEE8 - 
EEF8 - 
EF0S - 
EFOC - 
EF23 - 
EF3B - 
EF53 
F04R 
F1A4 
F265 
F2R4 

F2CE 
F2D3 
F30B 
F352 
■F40C 
F413 
F41A 
F41C 
F423 
F427 
F429 
F42F 
F436 
F438 
F43E 
F445 
F44C 

FC19 
FCB3 
FCBE 
FDO0 
FF52 



Send 
Send 
Send 



Input until carriage return 
Read keyboard 
Output to screen 
Keyboard select vectors 
Unshifted table 
Shifted table 
CEM key table 
Control table 
Shift/run equivalent 
Delay for 0.5 sec 
Find any tape header 
Find a specific header 
Get ($0328) 
Input <$0322> 
Output ($0324) 
Receive from serial 
Send serial deferred 
Set input device <*03lC> 
Set output device <$03lE) 
Send 'talk' 
talk SA 
'listen' 
listen SR 

- Close f i le <$03lR> 

- Find f i le entry 

- Get f i le detai Is 

- Abort all files <*032fl> 

- Restore default I/O <*@320) 

- Send 'un listen' 

- Send 'untalk' 

- Open fi le ($9318) 

- Load Program ($032E> 

- Save program ($0330) 

- Test STOP key <$0326> 

- Power reset entry 

- Set kernal vectors 

- Store kernal vectors 

- Initialise I/O 

- Initialise system constants 

- Set f i lename detai Is 

- Set f i le detai Is 

- Fla9 status 

- Get status 

- Set timeout 

- Read/set top of memory 

- Read top of memory 

- Set top of memory 

- Read/set bottom of memory 

- Read bottom of memory 

- Set bottom of memory 

- Monitor call entry 

- Monitor BRK entry <$0316> 
User vector <$032C> 

- Get I/O address 
-IRQ entry 

- IRQ exit 

- TED memory 

- Perform 'MONITOR' 




This month A.P. and D.J. 
Stephenson provide the key 



T-H-E 



to Basic and devle into the 
mysteries of keywords. 



SOME READERS WHO HAVE BEEN 
following this series may have found the 
last few articles a little tough. This month, 
we thought it would be nice to pause for 
breath and go over some of the lesser 
used BASIC keywords in detail. 

The Basic language, as implemented in 
the C64, employs a variety of keywords 
which are sufficient to cope with most 
situations. A good proportion of the total 
are in constant use and have been treated 
and used in earlier articles in this series. 
For various reasons we have neglected 
some of them altogether. A few others 
have been used without adequate 
description. Although all keywords are 
defined in the user manuals, alternative 
treatments can often lead to a better 
understanding. 

The vocabulary of any language is 
seldom utilised to the full. Indeed, in 
everyday speech, we only use a fraction of 
the total number of words we know. It is 
the same with programmers. However 
rich the Basic vocabulary, it is easy to get 
into a rut by sticking only to those 
keywords which are easy to understand or 
use. Unfortunately, the most ardent 
admirer of the C64 or Vic 20 would be 
forced to admit that the Basic voc- 
abulary in these machines is, to say the 
least, sparse. Because of this, it is 
particularly important that we know how 
to make efficient use of every keyword. 
Before dealing with them individually, it 
pays to classify them into order. 

Types of keyword 

A keyword is any combination of 
characters, chosen for their mnemonic 
value, recognised by the interpreter as an 
order to be carried out. They fall into one 
of three classes, -statements or functions. 

Commands are keywords which have 
an overall effect on the complete 
program. They are more often employed 
outside a program in direct mode. 
However, they will also work within a 
program under a line number. The 
following keywords are direct 
commands: CONT, LIST, LOAD, NEW, 
RUN, SAVE, VERIFY. 

Statements are keywords which 
perform some particular action within a 
program. Most keywords are statements. 

Functions are specialised statements 
which perform a standardised operation 
on a variable. Functions can be 




recognised by the brackets which enclose 
the variables. The following complete list 
of Commodore functions uses X or Y as 
example numberic variables and A$ for 
string variables: ATN{X), CHR$(X), 
COS(X), EXP(X), FRE(X), INT(X), 
LEFT$(A$,X), LEN(A$), LOC(X), 
MID$(A$X.Y), PEEK(X), POS(X), 
RIGHT$(A$X), RND(X), SIN(X), SPC(X), 
SQR(X), STR(X), TAB(X), TAN(X), USR(X), 
VAL{A$}. 

Tl and Tl$ are exceptional in that 
Commodore classifies them as functions 
although they do not require brackets 
round the variable. Numeric variables 
used in functions are often called 
arguments. The arguments in two of the 
functions, POS and FRE, are dummies, 
meaning that some number must be 
entered to avoid triggering a syntax error 
although it doesn't matter what number 
you chose within the range 0 to 255. 

The command RUN 

RUN clears all variables when it starts a 
program from the first line number. It is 
possible to start a program from lower 
down the program by using RUN X, where 
X is the starting line number. RUN X will 
often lead to error conditions because 
variables created under previous line 
numbers are cleared from memory. 

If you want to restart the program a 
second time at some lower point, it is 
better to use GOTO X which leaves 
previously created variables unharmed. 
The main danger with using GOTO X is 
triggering a 'REDIM'D ARRAY' error if a 
DIM line is re-encountered. 

The command CONT 

A program comes to a halt under any one 
of the following conditions: 
(a) The RUN/STOP key has been 
pressed. 



(b) The program has reached either a 
STOP or END statement. 

(c) The program has reached the last line 
number. 

(d) The program has encountered a 
standard error condition. 

The program can always be restarted 
from the beginning or, by typing RUN X, 
started from line X. However, RUN or 
RUN X always clears variables from 
memory which were created by the last 
run. Only the program is retained. 

The command CONT can provide a 
powerful weapon for sniffing out bugs in 
a program during the development stage. 
It is usually possible, providing the 
development has proceeded in 
accordance with guidelines of good 
structure, to recognise certain critical 
points in a program. 

To check the value of variables at these 
critical points, temporary STOP 
instructions can be inserted. When the 
program is RUN, it will halt at the first 
STOP and you can check the state of the 
variables by printing out their value. If the 
values are different to what you expected 
there is little point in proceeding with the 
rest until the reason for the discrepancy 
has been found. Assuming that 
everything is OK, you can allow the 
program to carry on with the next 
segment by again using CONT. 

Unlike RUN, which always starts the 
program afresh, CONT allows it to carry 
on from where it was stopped and 
preserves the value of all variables 
reached up to that point. These 
temporary STOPs act as 'break points' in 
the program, enabling the status to be 
investigated and faults remedied in a 
series of easy stages. 

To take full advantage of break points, 
the program should use fixed, easy to use, 
values so the results of calculations can 
easily be checked manually at the end of 
each one. Remember that CONT will not 
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work if the program has halted due to an 
error condition. If you try it, the response 
will be 'CAN'T CONTINUE. 

The command NEW 

As far as Basic is concerned, the command 
NEW will clear the entire memory, 
including any pre-existing program. 
Although NEW is usually entered in direct 
mode, you may include it within the 
program under a line number. If you start 
on a new program when the previous one 
or its remnants are stil in memory, be 
prepared for some unexpected results. 
Switching OFF and ON again will clear 
everying but entering NEW is more 
elegant. 

Authorities disagree on the wisdom of 
repeatedly switching the power on and 
off more than absolutely necessary, 
ated use of the main switch may 
reduce the life of some of the more 
itive chips. 

e command LIST 
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is probably the most overworked 
mmand in Basic. Although the default 
listing js to the screen, a previously active 
CMD statement can be used to output the 
listing to a printer or other suitable 
peripheral. 

You may include LIST within a 
program under a line number but, after 
the listing, the program will always revert 
to command mode and the READY 
message. Unless it is placed at the line 
immediately preceding the END 
statement, it is difficult to imagine what 
purpose LIST can serve within a program 
other than saving you the trouble of 
entering LIST afterwards. But then you 
don't always want a listing after every run! 

The command SAVE 

This command can only be used to save 
programs. It saves on tape by default or on 
disc by quoting device number eight after 
the program name. The Commodore 
method of saving on tape is slower than 
some other machines, partly because two 
copies are always saved so that read errors 
on playback are easily pinpointed by 
discrepancies between the versions. 

If SAVE is used within a program under 
a line number, the program is hatted 
while the tape or disk is being recorded. 
On completion of the save operation, it 
carries on with the rest of the program. In 
this way, it is possible to save a program 
and run it in one go, although you'll pro- 
bably never need to do this. 

The LOAD command 

When you load a program using LOAD as 
a direct command, all variables are 
cleared from memory including any 
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Figure 13.1 



resident program which may be there. If 
LOAD is used as a statement within a 
program, although the existing program is 
cleared, the existing variables are 
untouched and a RUN automatically 
follows. Used in this way, the LOAD 
command acts as a 'chain' command so 
that several programs on tape or disk can 
be chained together. This allows large 
programs which would exceed the 
bounds of memory, to be entered in parts 
small enough to be accommodated 
within the memory space available. Each 
subsequent program finds an 
environment already prepared by 
previous programs. The individual smaller 
programs must be carefully designed to 
ensure that, apart from their use of 
existing variables, they are self sufficient. 

For example, one program cannot 
GOTO a line number of another because 
it would not be in the computer's 
memory. The program bytes are normally 
loaded into a block of memory starting at 
address 2048 (0800 hex) onwards. 

The VERIFY command 

Pessimists use VERIFY immediately after 
they have saved a program on tape. It 
takes a long while to save a large program 
and just as long to verify it afterwards so it 
is a precaution which many programmers 
neglect to take. In any case, the most 
likely reason for failing to LOAD is an 
error during playback rather than during 
record. 

However, VERIFY does have one 
additional advantage. Because it leaves 
the tape several inches after the 
program's end it is safe to receive another 
program immediately without worrying 
about overlap. 

POKE and PEEK 

These two statements are best considered 
together because they occupy a grey area, 
midway between Basic and the inner 



workings of the machine. In traditional 
Basic, the individual pigeon holes in 
memory are of no consequence because 
the interpreter takes care of all memory 
assignments. 

PEEK(X) enables us to have a look at 
the byte currently occupying memory 
address X. To avoid an "ILLEGAL 
QUANTITY' message, X must lie within 
the range 0 to 65,535. (There is no memory 
outside this range). 

POKE X,Y allows us to store the 
number Y in address X. Since a memory 
location can only hold one byte of data, Y 
must be within the range 0 to 255, and it 
must be a positive number. 

To PEEK a number can never be 
harmful but an indiscriminate POKE can 
turn sour. Poking the right number into 
the wrong address or vice versa crash a 
program. The results of a crash vary but it's 
usually either a screenful of dazzling 
screen characters or a stoney indifference 
to all keyboard activity. The crash will 
almost certainly occur if a number is 
poked into one of the workspace areas 
used by the operating system. 

You should regard the operating 
system with respect as it's capable of 
withdrawing all co-operation if crossed. 

Providing care is taken in choosing 
memory addresses, POKE can be used to: 

(a) Assign date bytes directly. For 
example, if we want to store numbers 
less than 256 in memory, it can be 
done far more economically by using 
POKE than by assigning the number 
to a Basic variable. It is not so 
convenient or flexible as normal 
assignments but worth bearing in 
mind when a lot of small numbers 
have to be manipulated. 

(b) As one of the elements in graphic 
work. 

(c) Passing parameters to machine code 
surroutines called from within Basic. 

(d) In spite of the warning regarding a 
POKE into operating system areas, 
there are a number of special 
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locations which can be POKED in 
order to modify certain effects. 

(e) To control colours. POKE 53282,8 will 
set background colour to orange. 

(f) It is possible to operate on selected 
bits of a memory byte by using the 
AND or OR operators in conjunction 
with POKE and PEEK. For example, bit 
4 in location 53270 decides whether 
the multi-colour character mode is 
on (bit 4=1) or off (bit 4=0). To ensure 
the off condition, use 

POKE 53270,PEEK(53270) AND 239 

This may seem a trifle obscure unless you 
are familiar with the bitwise features of 
AND. 

The AND statement 

It should not be difficult to understand 
the meaning of AND and OR when used 
in conjunction with the IF/THEN 
structure. For example, 

100 IF A< B AND C < D THEN PRINT X$ 

The syntax is almost self explanatory and 
clearly means that both conditions must 
be true. However, there are other, less 
obvious, qualities lurking beneath the 
surface which are known as bitwise 
operations. Study the following series of 
operations: 



Assume this pattern 
Now AND it with 
The result is 



11011011 
11101111 
11001011 



Note that the result is the same as the 
original pattern except where the AND 
pattern had a 0 in that position. The AND 
pattern, known as a mask, is calculated 
thus: Use '0' in the mask when you want 
'0's in the result, otherwise use Ts. 

Let's try a practical example. Suppose a 
certain memory location holds the 
following bit pattern: 

10011100 

Let's also suppose that we wish to clear bit 
4 or 0 without disturbing the others. (Bits 
are numbered 0 to 7, from right to left so 
bit 4 is the fifth bit from the right). The 
correct AND mask will be 11101111. 
Unfortunately, there is no provision in 
C64 Basic tor entering bit patterns direct. 
We have to use decimal so we must 
convert the bit patterns in the AND mask 
to decimal before it can be accepted. The 
above example required an AND mask of 
11101111. 

Working laboriously in decimal, this 
becomes 1+2+4+6+323+64+128 = 239. Pity 
Commodore doesn't provide hex 
numbers - this would make AND mask 
calculations dead easy. 

We are now in a position to return to 
the problem we left in the last section. 
You will remember that the following tine 



was supposed to clear bit 4 in location 
43270 to 0: 

POKE 53270,PEEK (53270) AND 239 

We are poking the same bit pattern back 
into the location after we have ANDed it 
with 239. We know that 239 decimal is 
11101111 which is the correct AND mask 
for clearing bit 4 in the original location. 
To consolidate, confirm that the following 
apparent absurdities are in fact quite true: 
247 AND 251 * 251, 7 AND 8 = 0. 

The OR statement 

This, like the AND, has bitwise 
connotations. As we have seen, ANDing is 
used when we want to clear certain bits to 
0 but ORing is used when we want to set 
certain bits to 1. The rule for the OR mask 
is a follows: Use'1's in the mask where bits 
are to be '1's, otherwise use '0's. 

Suppose we start with 11001011 
Then we OR it with 00010000 
The result is 11011011 
Note that the result is the same as the 
original except in the position where 
there was a 1 in the OR mask, 

Let's return to our previous example 
once again but this time, assume we want 
bit 4 in location 53270 to be a 1. The OR 
mask must be 00010000, which in decimal 
is 16. Our POKE line then becomes: 

POKE 53270,(PEEK 53270) OR 16 

To consolidate, confirm the following: 7 
OR 7 = 7, 5 OR 2-7. 

The NOT statement 

This is the third member of the trio 
capable of bitwise operations. Before 
describing its action, we must first define a 
few terms: To flip, means to change a 1 to 
0 or vice versa. The bit complement 
(logical complement or one's 
complement) is the bit pattern formed by 
flipping all the bits. The two's 
complement is the same as the bits 
complement except that an extra 1 is 
added. Example: 

Starting with 10010111 
Bit complement is 01101000 
Two's complement is 01101001 

The NOT statement forms the two's 
complement of a bit pattern which can 
lead to rather mysterious results. For 
example, NOT 1 = 255. To see why, note 
that 1 ■ 00000001 so the two's complement 
is 11111110+ 1 = 255. 

The mystery clears up when we learn 
that a negative number, as far as the 
computer is concerned, is really the two's 
complement form of the equivalent 
positive. When we NOT something, we 
are really asking for the negative version. 



All this information on the bitwise 
operations of AND, OR and NOT is really 
crossing the border between Basic and 
machine code. The same thing can be said 
regarding the next item. 

The SYS command 

It is possible to mix Basic with machine 
code in the one program. There are 
several situations where such a mix may 
be justified. The execution speed of Basic 
is sufficient for some purposes but 
intolerable for others. Another 
disadvantage of Basic is that memory is 
not used economically. For example, in 
Basic, the memory set aside for numbers is 
fixed, irrespective of their magnitude. It 
takes just as many bytes to store the 
number three as it does to store 3000. 
Machine code programs can arrange for 
memory storage to be more closely 
tailored to magnitude. 

However, machine code is not 
everyone's idea of the good life so, as far 
as possible, most of the program may 
continue to be written in the tranquil 
environment of Basic, with only the 
occasional leap into and out of machine 
code. Figure 13.1 shows how such leaps 
can be performed using the keyword SYS. 

Note from the figure that we can only 
jump to a machine code subroutine if we 
happen to know where it is located in the 
memory map. In other words, we must 
know the starting address. If you've 
written the machine code there's no 
problem but you may want to use some of 
the ready made versions already residing 
in the ROM. These are free, providing you 
find out the starting address by consulting 
the Programmer's Reference Guide or 
employing some crafty detective work. 
Remember you can always PEEK locations 
in ROM. 

There is one obstacle that can arise in 
the use of SYS. Many subroutines only 
work if information is provided. To quote 
a simple example, a subroutine to find the 
square of a number obviously can't work 
unless it is supplied with the number to be 
squared. When such a subroutine is 
written, it will assume the number to be 
already residing in a particular memory 
location. The address will form part of the 
accompanying documentation. 

Therefore, before we call on the 
subroutine by means of SYS, we must 
poke this information in the required 
address. Thus a typical call might look like 
this: 

100 POKE 34520,16 
110 SYS 34500 

The data location is 34520and the number 
16 has been poked into it. The subroutine 
is assumed to start at address 34500. 
The machine code subroutine must end 
with RTS (Return from Subroutine) 
otherwise control will not come back to 
Basic. 






Take on your 64 at 
dominoes with this 
listing from Roy 
Titchard. 
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REM DOMINOES 
REM BY ROY TITCHARD 1985 
G05UB5930 



100 
110 
120 
130 : 

140 F0RNM-1T015:READMN:NMS-NMS+CHR 
SCMN) : NEXTNM 

150 DATA66 , 89 , 32 , 92 , 79 , B9 , 32 , B4 , 73 

,84,67,72,65,82,68 

160 POKE53280,0:PDKES3281,0. 

170 : 

180 PRINT "C CLEAR D C DOWN] C DOWN] CDOWN 
D":F0RA-0T03:PRINTTABC10)D0$CA); :N 
EXT 
190 : 

200 PRINT"CDOWN]CDOWN] CDOWN] CDOWN] 

* ; NM$ 

210 : 

220 PRINT "C DOWN] C DOWN ] C DOWN 3 C DOWN] 
CDOWN] C DOWN] C YELLOW] C RUSON] DO 

YOU NEED IN 
STRUCT I DNS CRUS0FF3 CY-N]" 
230 GETAS: IFA$" " "THEN230 
240 IFAS-"N"THEN1210 
250 IFA$-"Y"THEN2B0 
260 G0T0230 
270 : 

2B0 PRINT"CCLEAR]CGREEN] 
CRUSON] INSTRUCTIONS CRU50FF] " 
290 : 

300 PR INT "C DOWN] C CYAN 3 NORMAL DOM IN 

0 RULES APPLY " 

310 : 

320 PRINT"CDOWN]YOU WILL BE PLAYIN 
G WITH A DOUBLE SIX" 
330 : 



340 PRINT"CDOWN]PACK AND DEALT NIN 
E DOMINOES . " 
350 : 

360 PR I NT "CDOWN] THE FIRST 'DROP' W 
ILL BE RANDOM EITHER" 
370 : 

3B0 PRINT"CDOWN]YDU OR THE COMPUTE 
R GOING FIRST." 
390 : 

400 PRINT"CDOWN]IF YOU GAIN 1ST DR 
OP THEN YOU CH009E" 
410 : 

420 PR INT "CDOWN] YOUR DOMINO BY NUM 
BER CI TO SI" 
430 : 

440 PRINT"CDOUN:THE DOMINO IS THEN 
DISPLAYED IN THE" 

450 : 

460 PRINT"CDOWN]CENTRE OF THE SCRE 
EN. " 
470 : 

4B0 PRINT"CDOWN]CDOWNJ CYELLO 
WKRUSON] PRESS RETURN TO CONTINUE 

CRUS0FF3" 
490 GETAS: I FAS- " "THEN490 
500 IFASOCHRSC 13DTHEN490 
510 : 

520 print"ccleardcdown:the compute 
r will automatically make" 

530 : 

540 PRINT "CDOWN] ITS MOUE AND RECOR 
D THE MOUE AT THE " 
550 : 

560 PRINT"CDDWN]TOP RIGHT OF THE S 
CREEN . " 
570 : 



5B0 PRINT"CD0WN3THE CENTRE DOMINO 
WILL THEN CHANGE TO" 
590 : 

600 PRINT"CD0WN3SH0W THE MOUE PLAY 
ED CLE) YOU DROP" 
610 : 

620 PR I NT "C DOWN} DOUBLE BLANK THE C 
OHPUTER PLAYS ONE" 
630 : 

640 PR I NT "C DOWN 3 BLANK SO THE CENTR 
E DOniNO CHANGES TO" 

650 : 

660 print"cdown3blank ONE, AND SO 
ON. " 
670 : 

6B0 PRINT"CD0WN3A RECORD OF YOUR M 
DUES IS KEPT ON THE" 
690 : 

700 PRINT"CD0WN3B0TT0M RIGHT OF TH 
E SCREEN." 
710 : 

720 print"cdown3 cwhite3cruson3 
press return to continue crus0ff3 

730 getas: i fas- " "then730 
740 ifa$<>chr$c13)then730 

750 : 

760 PRINT "C CLEAR] CDOUNDCc 13IF YOU 
R MOUE COULD ALTER THE STATE OF" 
770 s 

7B0 PRINT"CD0WN3PLAY CLE) CENTRE 
DOHINO READS ONE-TWO" 
790 : 

BOO PRINT"CD0WN3AND YOU PLAY ONE-T 
WO THEN YOU LUILL BE" 
BIO : 

B20 PRINT "CD0WN3 OFFERED THE CHOICE 

OF MAKING IT EITHER" 
B30 : 

B40 PRINT"CD0WN30NE UP OR TWO UP C 
BOTH ENDS THE SANE) " 
B50 : 

B60 PRINT"!:D0U)N3Y0U then PRESS FRO 
n '0 ' CBLANK) TO 6" 
B70 : 

BBO PRINT"CD0UN3DEPENDING on which 

DOniNO YOU CHOOSE. " 
B90 : 

900 print"cdown3Cwhite3CRuson3 if 
you cannot play a dohino then crus 
off:" 

910 : 

920 print"cdown: cruson3 p 

ress return erusoffkc 13" 

930 : 

940 PRINT"nD0WN3Y0UR MOUE WILL THE 
N BE RECORDED AS L YELLOW] C RUSON 3 OU 
TCRU5QFF3Ccl3" 



950 : 

960 : 

970 PRINT"IIDOWN3CDOWN3 CCYAN3 
CRUS0N3 PRESS RETURN TO CONTINUE C 
RUS0FF3" 

9B0 GETAS: I FAS-" "THENSBO 
990 IFASOCHR$C13)THEN9B0 
1000 : 

1010 PRINT"CCLEAR3CDOWN3CDOWN3CYEL 
L0W3IF A GAME IS 'STITCHED * CNEITH 
ER PLAYER" 
1020 : 

1030 PRINT"CD0WN3CAN GO) THEN THE 
WINNER IS THE PLAYER" 
1040 : 

1050 PRINT"CD0WN3WITH THE LEAST NU 
MBER OF SPOTS." 
1060 : 

1070 PRINT"CDOWN3CDOWN3THE DOMINOE 
S ARE COLOUR CO-ORDINATED" 
10B0 : 

1090 PRINT"CDDWN3FDR EASY IDENTIFI 
CATION. " 
1100 : 

1110 PRINT"CDOWN3CDQWN3CRED3 ON 
EC YELL0W3 IS RED : TWO IS YELLOW " 
1120 : 

1130 PR I NT "C DOWN 3 C GREEN 3 THREEC 
YELL0W3 IS GREEN : CCYAN3F0URC YELLO 
W3 IS CYAN" 
1140 : 

1150 PRINT"CDOWN3CPURPLE3 FIUEC 
YELL0W3 IS PURPLE :Cc 13SIXCYELL0W 
3 IS ORANGE" 
1160 : 

1170 PRINT"CDOWN3CDOWN3 Cc 63C 

RUSON 3 PRESS RETURN FOR FIRST GAME 

CRUS0FF3 " 
11B0 GETAS: I FAS- " "THEN1 1 BO 
1190 IFA$<>CHRSC13)THEN11B0 
1200 : 

1210 PRINT"E:CLEAR3 " : G0SUB5930 
1220 GU$CO)-"BLANK 
1230 GU$C1)-"0NE " 
1240 GU$C2)-"TW0 " 
1250 GU$C3)-"THREE 
1260 GU$C4)-"F0UR " 
1270 GU$C5)-"FIUE " 
1280 GU$C6)-"SIX " 
1290 : 

1300 OUS-"CRUSON3CYELLOW30UT[IRUSOF 

F3CGREEN3" 

1310 : 

1320 P$C3)-"CYELLOU3CHOME3CDOWN3CD 
OWN 3 C DOWN 3 C DOWN 3 C DOWN 3 C DOWN 3 C DOWN 3 
CD0WN3 CD0WN3 
CDOWN3CDOWN3" 
1330 : 



CCCCCCCCCC 



1340 P$C6:i-"CH0riE3CD0UN3CD0WN3CD0W 
N3 C D0WN3 C D0WN3 C DOWN] C DOWN] C DOWN] C D 
OWN]CDOWN]CD 
OWN] C DOWN]" 
1350 : 

1360 psc4:)- "c yellow] chome]cdown] cd 
□un] c down 3 c down i] c down] c down 3 c down 3 
cd0wn3cd0wn3 
cdown3CDOwn3 

1370 : 

1380 PSCi:)-"CH0riE3CD0WN3CD0UN3CD0W 
N3 C DOWN 3 C DOWN] C DOWN 3 C DOWN 3 C DOWN] C D 
□WN3CD0WN3C0 

0WN3 CD0WN3C DOWN] C DOWN] C DOWN] C DOWN] 
CDOWN] CDOUN3CDOUN3CDOUN3 CD0WN3CD0W 
N3 CDOWN] " 
1390 : 

1400 P$C2)-"CH0riE] CDOWN] C DOWN] C DOW 
NKDOWN3CDOWN3CDOWN3CDOWN3CDOWN3CD 
OWN3CDOWN3CD 

OWN] C D0WN3 C DOWN] C DOWN] C DOWN] C DOWN] 
C DDUN] C DOWN] C DOWN 3 C DOWN ] C DOWN 3 C DOW 
N3CDOWN3CDQW 
N]CD0WN3" 

1410 DIMSSC2B3 ,CSCEB) ,riSC5B) ,nC2B5 
,RC2B:> 
1420 
1430 
1440 
S3" 
1450 
1460 
1470 
14B0 

1490 
US 

1500 
1510 
1520 
1530 
1540 
US 

1550 
1560 
1570 
15B0 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 

c S] 
16B0 
1690 



DinDSCB? 

■ 

D$Cl)- M Cc 

-us 

• 

D$CE)="Cs 
DSC3D-"Cs 
D$C4)-"Cs 
DSC5)="Cc 

D$C6)-"Cs 
D$C7)-"Cs 
D$CB)-"Es 



53Cc A3Cs C3Cs C3Cc 



-] 
-] 
-1 

Q3Cs 

-] 
-] 
-] 



Cs -]"+U$ 
Cs -]"+US 
Cs -]"+U$ 
C3Cs C3Cc W3" + 

Cs -]"+U$ 
Cs -3"+U$ 
Cs -3"+US 



D$C9)-"Cc 2]Cs C]Cs C]Cc 



EflSCl)-" 
En$CB)-" 
EHSC3 ) - " 
En$C4)=" 
En$C53=" 
En$C6)=" 
En$C7)-" 
EMSCB ) - " 
En$C9)»" 

En$cio^=" 

- 

BLSC1 }-"Cc 

•+us 

BL$CB5-"Cs 



"+US 
"+US 
"+US 
"+U$ 
"+US 
"+US 
"+US 
"+US 

»+u$ 

" + U$ 




5]Cc A3Cs C]Cs CDC 



-] C RUS0N3 C s U3Cs 
]CRUSOFF]Cs -3"+U$ 



1700 : 

1710 BL$C3)-"Cs -3CRUSON3Cs U]Cs U 
]CRUSOFF]Cs -3"+US 
1720 : 

1730 BL$C4!)-"Cs -3CRUSON3Cs U3Cs U 
]CRU50FF]Cs -3-+US 
1740 : 

1750 BLSC5)-"Cs -]CRUSDN]Cs U]Cs U 
3CRUSDFF]Cs -]"+US 
1760 : 

1770 BL$C6)-"Cs -]CRUSON]Cs U]Cs U 
KRUSOFFKs -]"+U$ 
17B0 : 

1790 BLSC7)-"Cs -]CRUSON]Cs U]Cs U 
]CRUSDFF]Cs ~3"-MJS 
1800 : 

1810 BL$CB3-"Cc Z]Cs C]Cs C]Cc X]" 

+us 

1B20 DRSCl)="CCYAN3Cc A3Cs C]Cs C3 
Cs C]Cc R]Cs C3Cs C3Cs C3Cc S3 "+US 
1830 : 

1B40 DR$C2)="Cs -] Cs -] Cs -] 
"+U$ 

1850 DR$C3:-"Cs -] Cs -] Cs -] 
"+US 

1860 DR$C4!)-"Cs -] Cs -] Cs -] 

"+US 

1B70 : 

1BB0 DR$C5)-"Cc 2]Cs C3Cs C3Cs C3C 
c E3Cs C3Cs C3Cs C3Cc X3"+US 
1890 : 

1900 MO$Cl)-"CBLUE]nE" 
1910 : 

1920 n0$C2)-"C3REEN]Y0U" 
1930 NG-0 

1940 5$ClD-"0-0":S$C2)-"0-l":S$C3) 
-"0-2 M :S$C4)-"0-3":S$C5)- n 0-4":SSC 

63- "0-5" 

1950 SSC7)-"0-6" 

1960 S$CB3-"1-1":SSC9)- M 1-2":S$C10 
)-"l-3":S$Cll)-"l-4 ":S$C12D-"l-5": 
S$C13)-"l-6" 

1970 S$C14)-"2-2":S$C15)-"2-3":S$C 

16)-"2-4":S$C17)-"2-5":S$ClB)-"2-6 
»» 

19B0 S$C19D-"3-3 ,, :S$C20)-"3-4 M :S$C 

21)-"3-5" : 5$C22)-"3-6 ,, 

1990 SSC23)-"4-4 ,, :S$C24)»"4-5":S$C 

25)-"4-6" 

2000 S$C26D-"5-5":5SC27)-"5-6" 
2010 S$C2B)-"6-6" 
2020 : 

2030 PRINT"CCLEAR3":T-0 
2040 PR I NT "C HOME 3 C DOWN] C DOWN] C DOWN 
3 C DOWN 3 C DOWN 3 C DDWN 3 C DOWN 3 C DOWN 3 C DO 
WN3":F0RA-0T 

03:PRINTTABC9)D0$Cf=O; : NEXTA 
2050 F0RB-1T09 
2060 : 




C64 G 



2070 PRINT"CH0nE:CUP3" 

2080 F0RA-1T0B: PRINTTABCTDBLSCA) ; : 

NEXTA : T-T+4 

2090 GDSUB51B0 

2100 NEXTB 

2110 T-0 

2120 F0RB-1T09 

2130 : 

2140 print"chqf1e3cd0wn:cddwn: cdown 
2 cd0uin3 c down 3 c do wn : c down 3 1 downkdo 
wn:cddwn:cdo 

WN:CDQWN:CD0WN:" 

2150 F0RA-1T09: PRINTTABCTDDSCAD ; :N 
EXTA: T-T+4 
21B0 GDSUB5180 
NEXTB 
FQRM-1T09 
R-INTC2B*RNDC0)+1) 
IF5SCRD-" "THEN2190 
CSCMD-SSCR) : MS C M ) «SS C R D 
SSCRD-" " 
NEXTH 
F0RH-1T09 

U1-UALCLEFT$CC$CM) . 1) D 




U2-UALCRIGHT$CC$CM;) 
IFfl-lTHENT-1 : TT-1 
I FM-2THENT-5 : TT-5 
IFM-3THENT-9: TT-9 
IFn=4THENT-13:TT-13 
IFM-5THENT-17 : TT-17 
IFM-6THENT-21 : TT-21 
I Fn=7THENT-25 : TT-25 
IFM-BTHENT-29 : TT-29 
IFn-9THENT-33:TT-33 



I>3 




2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
22B0 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 : 

2370 PRINT"CHOriE:CDOWN:CDDWN: CDOWN 

:cdown: c down: c down: c down: cdown:cdd 

WNKDOWNDCDO 

UJN 3 C DOWN 3 C DOWN 1 C DOWN 3 " 

23B0 IFUK1THENU1-0:G0T02440 

2390 FDRA-1TDU1 

2400 JP-U1 :G0SUB5510 

2410 PRINTTABCTDSPS; : T-T+l : IFT>TT+ 
1THENPRINT : T-TT 
2420 NEXTA 
2430 : 

2440 PRINT"CHDHE:CDDWN:CD0WN:CD0WN 

: c down: c down: c down: c down: c down: cdd 
unjcdoundcdd 

wn:cd0wn:cd0wn3cd0wn: cdown: cd0wn3c 

down:cdown:":T-tt 

2450 ifu2<1thenu2-0:g0t0 2500 

2460 FDR2-1T0U2 

2470 JP-U2: G0SUB5510 

2480 PRINTTABCTDSPS; :T-T+1 ! IFT>TT+ 

1THENPRINT : T-TT 

2490 NEXTZ 

2500 NEXTM 

2510 : 



F0RX-1TD9 

R-INTC28-RNDC0D+1D 

IFBSCRD-" "THEN2530 

XSCXD-SSCRD 

SSCRD-" " 

NEXTX 



2520 
2530 
2540 
2550 
25B0 
2570 
25B0 
2590 
2600 

2610 PRINTPSCDTABCl V1"TABC63 "2"T 
ABC10r , 3 ,, TABC14)"4"TABC18r , 5"TABC2 
2D"6" 

2620 PRINTP$Cl)TABC25r'7"TABC29V8 

"TABC34i"9" 

2630 G0T04080: 

2640 : 

2B50 : 

2660 PRINT"C YELLOW: CH0nE:CD0WN3CDD 
WN: CDOWN3CDOWN3 CDDWN3 C DOWN: CDOWN: C 
down: C DOWND c 

DDWN: "TABCOD "ENTER" : PR I NTT ABC 0) "YO 

UR" : PRINTTABCO) "HOUE" 

2670 P0KE19B.0 

26B0 GETGS: I FGS-" "THEN26B0 

2690 IFGS-CHR$C13)THENGDSUB5410 

2700 IFSS-CHR$C13)THENG05UB5630: IF 

CH-1THENCH-0 : G0TQ26B0 

2710 IFGS-CHRSC13)THENZ2-l:n0$C2)- 

no$C2:> + "c down: cleft: cleft: cleft: "+ 

0U$:PRINTP$C 

6)TABC36DnD$C2) : GDTD3140 

2720 6-UALCGS) : IFG< 10RG> 9THEN2680 

2730 .- 

2740 print"c yellow: c hone: c down: c do 
wn: c down: c down: c down: cdown:c down: c 
down:cdown:c 

down: "tabco) « ": printtabco:> " 

n : PRINTTABCO) " 
2750 IFNG-OTHEN PRINTTABC 10DPSC4 3 
IFMSCG5-" "THEN2660 
Ul-UALCLEFTSCriSCGD , ID D 



2760 
2770 
2780 
2790 



U2-UALCRIGHT$CnSCG) , 1)) 



IFNG-1ANDU10LDANDU10RDANDU2 
< > LDANDU2< > RDTHEN2660 
2B00 : 

2810 nosc2)-nasc2)+"CDDWN: cleft: cl 
eft: cleft: "+mscg} 

2820 printp$c6dtabc3bdnq$c2) 

2B30 : 

2B40 print"cyellow:chdme:cdown:cdo 
wn:cdown:cdown:cdown:cdown:cdown:c 
down: " 

2b50 f0ra-1t05 : printta8c 15ddrsc ad ; 

: NEXTA 

2860 IFNG-0THEN2940 
2870 G0T04BB0 
28B0 : 

2B90 K-iO: ees- h c home: c down: cddwn:c 
down: c down: c down: c down: c down: c down 



^^ll^^^lll^ iHE^IIII^II^ ^^El^^^l^lllt ^I^^BlUllllU lllllNIIIIIIV IH^^0MII^I^^F IIEllllll^^lll ^^^S^^^BI^II^t 



mmam mourn 



3 C D0UIN3 CDDUJN 
3CDDWNJCDOWN3CDOWN3CDOWN3":GOSUB37 
00:B05UB5180:n$CG)-" " 
2300 IFU1=LDTHENLD-U2:G0SUB5110:G0 
5UB3510 : GDSUB3B30 : G0T03140 
2910 IFU2-LDTHENLD-U1 : G0SUB5110 : GO 
SUB3510 : G0SUB3B30 : G0T03140 
2920 I FU2-RDTHENRD=U1 : GDSUB51 10 ; GO 
SUB3510 : G0SUB3B30 : G0T03140 
2930 IFU1-RDTHENRD-U2 : GQSUB5110 : GO 
SUB3510 : G0SUB3B30 : G0TD3140 
2940 : 
2950 : 

2960 PRINT"C YELL0U3CH0f1E3CD0UN3CD0 

mi C D0WN3C down: C D0UN3 C DDWN3 CD0WN3 C 

DQUN3CD0UN3" 

:T-16:G0SUB51B0 

2970 IFUK 1THEN3020 

29B0 F0RA-1T0U1 

2.990 JP-Ul:G0SUB551O 

3000 PRINTTABCT)SPS ; :T-T+2: IFT> 18T 
HENPRINT : T-1B 
3010 NEXTA 
3020 T-20 
3030 : 

3040 PRINT n C YELLDW 3 C H0riE3 C D0UN3 C DO 

WN3CDOWN3CDOWN3CDOWN3CDOWN3CDOWN3C 

D0WN3 CD0WN3 " 

3050 IFU2<1THEN3100 

3060 F0RZ-1T0U2 

3070 JP-U2:G0SUB5510 

3080 PRINTTABCT)SP$; :T=T+2: IFT>22T 

HENPRINT: T-20 

3090 NEXT2 

3100 LD-U1 : RD-U2 : NG-1 : G05UB5180 : GO 

SUB5110 

3110 : 

3120 K=10: EES-"CHOriE3CDaWN3CDOWN3C 
DOWN 3 C DOWN] C DOWN 3 CDDWN3 C DOWN 3 C DOWN 
3CDOWN3CDOWN 

3 C DQWN3C D0WN3 1 D0WN3 C DOWN 3 " : G05UB37 
00:P1SCB)- W ":G0SUB51B0:G0T03140 
3130 : 
3140 : 
3150 : 
3160 
3170 
31B0 
3190 
3200 
3210 
30 
3220 
30 
3230 
30 
3240 
30 
3250 



3260 

3270 n0SCl)-n0$Cl)+"CD0WN3CLEFT3CL 
EFT3CLEFT3" + *'CRUSON3CYELLOW30UTCRU 
50FF3 C BLUE3 " 
32B0 : 

3290 PRINT "CH0nE3 C DOWN 3 "TABC 37)f1D$ 
CI): GQSUB5410 

3300 F0RDELAY-1T0200 : NEXTDELAY 
3310 IF22-1THENG0TQ4560 
3320 G0T02660 
3330 G05UB5110 
3340 : 

3350 nO$C13-nOSC13 + "CDDUINDCLEFT3CL 
EFT3CLEFT3 "+XSCA) 
3360 : 

3370 PRINT"CH0nE3CDDWN3"TABC37)n0S 
CI) 
33B0 
3390 
3400 
1 3410 
3420 
3430 
3440 
3450 
3460 
3470 
34B0 : 

3490 2Z=0:K-g:EE$-"tH0ME3 



IFA-1THENT-0 

IFA-2THENT-4 

IFA-3THENT-B 

IFA-4THENT-12 

IFA-5THENT-16 

I FA-6THENT-20 

IFA-7THENT-24 

IFA-BTHENT-2B 

IFA-9THENT-32 

XSCA)-" " 



GDT05B20: 

F0RA-1T09 

IFXSCA)-" "THEN3250 

C1CA)-UALCLEFT$CX$CA) ,1)) 

C2CA)-UALCRIGHTSCX$CA) ,1)) 

IFC1CA)-LDTHENLD-C2CA):G0T033 

IFC1CA5-RDTHENRD-C2CA) : G0T033 

IFC2CA)-LDTHENLD-C1CA) : G0TD33 

I FC2C A) = RDTHENRD-C1 C A ) : G0T033 

NEXTA 



22=0 : K-9 : EES' 
90 : G05UB5180 : G0SUB3510 : GDSUB3960 : G 
0T02640 
3500 : 

3510 PRINT"CYELL0U3CH0riE3CD0WN3CDD 
WN3 CDOWN3CDOUN3CDDUN3 CD0WN3 CD0WN3 C 
D0WN3 " 

3520 F0RA-1T05:PRINTTABC15)DRSCA); 
tMEXTA 

3530 : 

3540 PRINT"CYELL0W3CH0riE3CD0WN3CD0 
WN3 CD0WN3 C DOWN 3 C DOWN 3 C DOWN 3 C DOWN 3 C 
DOWN3CDOWN3 " 
:T-16 

3550 IFLD<1THEN3610 
3560 F0RA-1T0LD 
3570 JP-LD:G0SUB5510 
3580 PRINTTABCT3SPS; :T-T+2: IFT>18T 
HENPRINT : T-16 
3590 NEXTA 
3600 : 

3610 PRINT"CYELL0U3CH0nE3CDOWN3CD0 
WN3CDOWN3CDOWN3CDOWN3CDQWN3i:DOUN3C 
DOWN3CDOUN3 " 
:T-20 

3620 IFRD< 1THEN36B0 
3630 FDRA-1T0RD 
3640 JP-RD:G0SUB5510 
3650 PRINTTABCT)SPS; 
HENPRINT: T-20 
3660 NEXTA 




T-T+2: IFT>22T 



C64 Game 



3670 
36B0 
3690 
3700 
3710 
3720 
3730 
3740 
3750 
3760 
3770 
37B0 
3790 
3B00 
3810 
3820 
3830 
3840 



GDSUB5180 
RETURN 




IFG=lTHENT-0 
IFG-2THENT-4 
IFG-3THENT-8 
IFG-4THENT-12 
IFG-5THENT-16 
IFG=6THENT-20 
IFG-7THENT-24 
I FG-8THENT=28 
IFG-9THENT-32 
PR INTEES ; 
F0RA-1T0K . 

PR I NTTABC T ) Ef1$ CA ) ; : NEXTA 
RETURN 
F0RU=1T09 

IFriSCU)-""THENTU-TU+l: IFTU-9T 
HEN3BB0 
3850 NEXTU 
3B60 TU-O: RETURN 
3870 : 

3880 PRINT*'CH0riE]CD0WN]CD0WN]CD0UN 

dcdounk down] cdown] c down] cdownkdo 

UN ] C DOWN ] t DO 

wn] c down] c down: c down] cddunx down] c 
down: c down] cdoun] well 
played" : un- 

0: lf-17: tp-1 : g0sub5330 

3890 : 
3900 : 

3910 PRINT : PRINT : PR I NTTABC 10) "ANOT 

HER GAME CY-N]" 

3920 GETAS: IFAS-" "THEN3920 

3930 I FAS- "Y"THENRUN1210 

3940 I FAS- "N"THENEND 

3950 G0TQ3920 

3960 F0RU-1T09 

3970 IFXSCU)-""THENTU-TU+1: IFTU-9T 
HEN4010 

3980 NEXTU 

3990 TU-0 : RETURN 

4000 : 

4010 PR I NT " C HOME ]C DOWN ]C DOWN] C DOWN 
] CCYAN] HARD LUCK":WN 

-17:LF-0:TP- 
-1:GD5UB5330 
4020 
4030 
4040 

4050 PRINT : PRINT : PR I NTTABC 10) "ANOT 
HER GAME CY-N]" 
4060 G0T03920 
4070 : 

4080 ND-INTCRNDC .5)*2+l) 

4090 PRINT"CHOME]CDOWN]CDOWN]CDDWN 

3CD0WNKD0WN] CDOUN] CDOUN] CDOUN] CDO 

WN]":F0RA-1T 

□4:PRINTTABC9)K1S:NEXTA 



4100 I FND-1THENND-0 : PR I NTPSC 3 )TAB C 
10) "YOU HAUE FIRST DROP" : G0T02640 
4110 PRINTP$C3)TABC8) "I HAUE THE F 
DROP" : FQRDELAY-1T01000: NEXTDE 



IR5T 
LAY 
4120 
4130 
4140 



Cl-UALC LEFTS C XSCND) ,1)5 
C2-UALCRIGHTSC XSCND) , ID) 



PRINTTABC8)P$C4) 
F0RND-1T09 

I FLEFTS C XSCND) , 1 )-RIGHT$CXSCN 
D) , DTHEN41B0 
4150 NEXTND 

4160 ND-INTCRNDC .5)*6+l) 
4170 : 

4180 PRINT"C YELLOW: CHOME] CDOUN ] CDO 
WN3CD0WNKD0UNKD0UNK DOWN] C DOWN] C 
DOWN] " 

4190 FORA-1T05:PRINTTABC15)DR$CA) ; 
: NEXTA 
4200 : 

4210 K-9: EES- "CHOME] " : G0SUB4450 : GD 

SUB5180:G0SUB3790 

4220 : 

4230 MOSC 1 )-MO$C 1 ) + "C DOWN] CLEFT] CL 
EFT] CLEFT] "+XSCND) 
4240 : 

4250 PR I NT " C HOME] C DOWN] "TAB C 37 ) M0$ 
CI) 
4260 
4270 
4280 

4290 PRINT"C YELLOW] CHOME ] CDDWN] CDO 
UN] CDOUN] CDOUN]CDOWN]C DOWN] C DOWN] C 
D0UN]CD0UN] " 
:T-16 

4300 IFCK 1THEN4350 

4310 F0RA-1T0C1 

4320 JP-C1:G0SUB5510 

4330 PRINTTABCT)SPS ; :T-T+2: IFT>18T 

HENPRINT : T-16 

4340 NEXTA 

4350 T-20 

4360 : 

4370 PR I NT " C YELLOW] C HOME] C DOWN ] C DO 

WN] C DOWN] C DOWN ] C DDWN ] C DOWN] C DOWN] C 

DOUN]CDOWN]" 

43B0 IFC2<1THEN4430 

4390 F0RZ-1T0C2 

4400 JP-C2:G0SUB5510 

4410 PRINTTABCT)SP$; :T-T+2: IFT>22T 
HENPRINT: T-20 
4420 NEXTZ 

4430 XSCND)-" " : G0SUB5180 : LD-C1 : RD- 
C2:ND-0:G0SUB5110 
4440 IFNG-0THENNG-1:G0T02640 
4450 : 
4460 
4470 
4480 
4490 
4500 



IFND-1THENT-0 
IFND-2THENT-4 
I FND-3THENT-B 
IFND-4THENT-12 
IFND-5THENT=16 



EE 




4510 IFND-6THENT-20 
4520 I FND-7THENT-24 
4530 IFND-8THENT-28 
4540 IFND-9THENT-32 
4550 RETURN 

H56G Cl=0*Ce=OtMl-0:UE-0 
4570 : 

4580 PRINT"CCLEAR3":F0RA-0T03:PRIN 
TTABC 10)D0£C A) ; : NEXTA 
4590 : 

4600 PRINT"CDOWN3"TABC12)"CWHITE3S 
T ITCHED GAtlE" 
4610 : 

4620 PRINT "CHOrtE3CDOUN3CDOUN3C DOWN 

1 1 down3 c down3 c down: c ddwn3 c down3 c do 

WN3CD0WN3CD0 

WN3 CD0WN3 C DOWN 3 C DOWN 3 C YELLOW 3 "TABC 

36> M t1INE" 

4630 F0RA-1T09 

4640 IFXSCA)-""THEN46B0 

4650 C1-C1+UALCLEFTSCXSCA),D) 

4660 C2-C2+UALCRIGHTSCXSCA) , 1)5 

4670 PRINTTABC 36) X£C A ) 

46B0 NEXTA 

4690 : 

4700 PRINT"CH0riE3 CDDWN3 CDDWN3CD0WN 
3CDOWN3CDOWN3CDOWN3CDOUN3CDOWN3CDD 
WN3CDDWN3CD0 

WN3 CD0WN3 CD0WN3 CD0WN3 C YELL0U3 YOURS 
Cc 73" 

4710 F0RA-1T09 

4720 IFriSCA)-""THEN4760 

4730 Ul-Ul+UALCLEFTSCriSCA),l)) 

4740 U2-U2+UALCRIGHTSCri£CA) , 1)) 

4750 PR I NTT AB C 0 5 US C A 3 
4760 NEXTA 
4770 : 

47B0 PRINT "CYELL0W3CHDriE3CD0WN3tD0 
WN3CDOWN3CDOUN3CDOUN3CDOWN3CDOWN3C 

DOWN3CDOWN3C 

D0UN3 "TAB C 26 ) " I " : PR I NTTAB C 25 ) "HAU 
E":PRINTTABC25)C1+C2" " 
4790 : 

4800 PR I NT "C YELLDW3 CH0t"1E3 CD0WN3 CDO 
WN3 C DDWN3 C DOWN] C DDUJN3 C D0WN3 CDDWN3 C 
D0WN3 C D0WN3 C 

D0WN3 "TABC 10) "YOU " : PRINTTABC 10) "H 
AUE":PRINTTABC10)U1+U2" " 
4810 : 

4B20 IFC1+C2<U1+U2THENPRINT: PRINT: 
PRINTTABC16)"I UJIN" : G0T04030 
4B30 : 

4B40 IFU1+U2<C1+C2THENPRINI: PRINT: 
PRINTTABC16)"Y0U WIN" : GDTQ3890 
4B50 : 

4B60 IFU1+U2-C1+C2THENPRINT: PRINT: 
PRINTTABC 1G5 M UE DREUI" : G0TD3890 
4B70 : 

4B80 IFU1-LDANDU2-RDTHEN4910 



4B90 IFU1-RDANDU2-LDTHEN4910 
4900 G0T02830 
4910 IFLD-RDTHEN2890 
4920 : 

4930 G05UB5740 : GDSUB5740 : GDSUB5740 
4940 PRI NT "C YELLObJII CHOriEKDDUINaC DO 
UN3CDOWN3CDOWN3CDOUN3CDOUN3CDOWN3C 
D0WN3CD0UN3 " 

TABCO)GU$CLD):PRINTTABCO)"UP OR " 
4950 PR INTTABC 0 )GU$CRD ) : PRINTTABCO 



G0SUB5740 : G0SUB5740 : G05UB5740 
GETSDS: I F5DS- " "THEN4970 
SD-UALCSDS) 

I FSD<> LDANDSDO RDTHEN4970 
G05UB5740 : G0SUB5740 : GQSUB5740 



)"UP 
4960 
4970 
49B0 
4990 
5000 
5010 : 

5020 PRINT"C YELLDW3CH0ME3CD0WN3 £DD 
WN3CDOWN3CDOWN3CDOWN3CDDWN3CDI3UN3C 
DDWN3CDDWN3" 

TABC 0 ) " w : PRINTTABCO)" 

: PRINTTABCO) " 

5030 PRINTTABCO)" " : PRINTTAB 

CO) " 
5040 : 

5050 K-10:EE$-"CHOriE3CDOUN3CDOUN3C 
D0UIN3 C D0UN3C D0UN3 C D0UN3 C D0UJN3 C DOWN 
3CD0WN3CDQUN 

3 C DQUN3 C D0UIN3 C D0WN3 C D0WN3 " 

5060 IFSD-U1THENRD-U1 : LD-U1 : G0SUB5 

110 : G0SUB3510 : G0SUB3B30 : G0SUB3700 : 

niCG)-" ":G0S 
UB3B30 

5070 IFSD-U1THENG0TD3140 

50B0 IFSD-U2THENLD-U2 : RD-U2 : G0SUB5 

110 : G0SUB3510 : G0SUB3830 : G0SUB3700 : 

ri$CG)-"":G0S 

UB3B30 

5090 IFSD-U2THENG0T03140 
5100 G0TQ4910 
5110 UL-LD:UR-RD 
5120 : 

5130 PRINT"CYELL0W3CH0riE3CD0WN3CD0 
WN3CDDWN3CDOWN3CDOUN3CDOUN3CDOUN3C 
DDWN3CDOUIN3C 

D0WN3 C D0WN3 "TAB C 9 ) GUS C UL ) 
5140 : 

5150 PRINT"CYELL0U3CH0riE3CD0UJN3CD0 
WN3 £ DOWN 3 C DOWN 3 C DOWN 3 C DOWN 3 £ DOWN 3 C 
D0WN3CD0WN3C 

D0WN3CD0UN3"TABC26)GU$CUR) 
5160 RETURN 
5170 : 
51B0 
5190 
5 

5200 
5210 
5220 



SS-54272 : LF-SS : HF-SS+1 : AD-SS 

SR-S5+6 : UF-SS+4 : U0-SS+24 
H3-SS+15:L3-SS+14 
F0RX-SST0SS+24 




5230 PDKEX.O 
5240 NEXTX 

5250 PQKEU0,15:P0KEAD,5 :PDKESR,5 
5260 POKEUF, 17 
5270 F0RTZ-1T04 

5280 POKEWF , 130 : POKEHF , 33 : POKELF , 
33 

POKEHF , 0 : PDKELF , 0 
NEXTTZ 
RETURN 



5290 
5300 
5310 
5320 
5330 
5340 



PDKE54296, 15 

P0KE54276 , 0 : P0KE54272 , 0 : P0KE5 
4273 , 0 : P0KE54277 , 0 : P0KE5427B , 240 
5350 PDKE54276.33 

5350 FORZ-UNTOLFSTEPTP : P0KE53280 , Z 
: FDRZ1-1T015 : P0KE54273 , Z»Z1 : NEXTZ1 
.Z 

P0KE54276,0 
P0KE532B0,0 
RETURN 



5370 
53B0 
5390 
5400 
5410 
5420 



PDKE54296, 15 

PDKE54276 , 0 : P0KE54272 , 0 : P0KE5 
4273 , 0 : P0KE54277 , 0 : P0KE5427B , 240 
5430 P0KE54276.17 

FORZ-BOTOOSTEP-1 
PQKE54273,Z:NEXTZ 
PQKE54276,0 
P0KE532B0.0 
RETURN 




5440 
5450 
5460 
5470 
54B0 
5490 
5500 : 

5510 IFJP-lTHENSP$-"CREDDCs QDCBLU 
ED": RETURN 
5520 : 

5530 IFJP-2THENSPS-"CYELL0UIDCs QDC 
BLUED": RETURN 
5540 : 

5550 IFJP-3THENSP$-"CGREENDCs QDCB 
LUED": RETURN 
5560 : 

5570 IFJP-4THENSPS-"CCYANDCs QDCBL 
UED " : RETURN 
55B0 : 

5590 IFJP-5THEN5PS-"CPURPLEDCs QDC 
BLUED": RETURN 
5600 : 

5610 IFJP-6THENSPS-"Cc lDCs ODCBLU 
ED": RETURN 
5520 : 

5630 FDRU-1T09: IFnsCU)-" "THEN5670 
5640 01-UALCLEFTSCnSCU3,lD) 
5650 02-UALCRIGHT$Cn$CU? , 1DD 
5660 IF01-LD0RD2-LDDR01-RD0R02-RDT 
HEN5700 
5670 NEXTU 
5680 CH-O: RETURN 
_.5690 : 



5700 print"cyellduidchoriedcdouindcdd 
wnic ddojndc ddujnd c dound c ddojndc dound c 
doundcddundc 

DOUND "Tabco) "crusondyoucrusoffd " 

: PRINTTABCO) "CRUSONDCANCRUSOFFD " 
5710 : 

5720 PRINTTABCOr'CRUSONDGO CRUSDFF 
D " : PRINTTABCOr' 

5730 CH-1 : G0SUB5410 : G0SUB5410 : RETU 
RN 

5740 P0KE54296, 15 

5750 P0KE54276 , 0 : PDKE54272 , 0 : POKES 
4273 , 0 : P0KE54277 , 0 : P0KE5427B , 240 
5760 P0KE54276.17 

5770 NR-INTCC250-0+13»RNDC .55+OD 

5780 PDKE54273.NR 

5790 P0KE54276,0 

5B00 P0KE532B0.0 

5810 RETURN 

5B20 F0RA-1TD9 

5B30 IFXSCA)-""THEN5900 

5840 C1CA5-UALCLEFTSCXSCA) , 1) 5 

5B50 C2CA)-UALCRIGHT$CXSCA} , 1)5 

5BB0 IFC1CA)-C2CA)ANDC2CA)-LDTHENL 

D-C2CA) : GDT03330 

5B70 IFC1CA)-C2CA)ANDC2CA)-RDTHENR 
D-C2CA):G0T03330 

5880 I FC2C A5-C1 ( A) ANDC1 C A5 -LDTHENL 
D-C1CA):GQTD3330 

5890 IFC2CA)-C1CA)ANDC1CA)-RDTHENR 
D-C1CA):G0TD3330 



NEXTA 
G0TD3170 

US-CHRSC 135 
K1S-" 




5900 
5910 
5920 
5930 
5940 

5950 : 

5960 DOICO)-"CU)HITEJCc ADCs CDCs I 
DCs UDCs CDCs IDCs UDCc SDCc ADCs 
IDCc.RDCs UD 

Cs CDCs HCs UDCs CDCs IDCc ADCs C 
DCc ADCs CDCc SD"+U$ 

5970 DOSCi;>-"CYELLDUJDCs -D Cs -DCs 
-D Cs -DCs -DCs -DCs -DCs -DCs -D 
Cs -D Cs -DC 

s -3 Cs -DCc QDCs CDCc ZDCs CDCc S 
D"+U$ 

5980 D0SC2)-"CBLUEDCc ZDCs CDCs KD 
Cs JDCs CDCs KDCc ZD Cc XDCc EDCc 

ZD Cc XDCs 
JDCs CDCs KDCc ZDCs CD CUHITEDCs 
-D"+U$ 

5990 D0$C35-"Cs CDCs CDCs CDCs CDC 
s CDCs CDCs CDCs CDCs CDCs CDCs CD 
Cs CDCs CDCs 

CDCs CDCs CDCs CDCs CDCs CDCs CDC 
s CDCc XDCCYAND"+US 
6000 RETURN 



Machine code 



Our resident expert 
answers your 




I 




Most computers with function 
keys enable you to redefine the 
keys in Basic. I have been trying 
to do this for some time on my 
C64 but without too much 
success. Could you possibly tell 
me how this could be done? 
Norman Doyle 
Cleveland 



OUTPUT 



Unfortunately, as you have no 
doubt found out> there is no 
simple way to define the C&4. 
Most Basic extension packages 
(see our August and September 
issues) have a command which 
allows you to program keys by 
means of a new keyword. It is 
however quite simple to use 
these keys in your own 
programs without having to go 
to any expense. Take a look at 
the following short program 

10 GET A$ 

20IFA$ CHR$(T33) THEN 10 
30 IF A$ CHR${140) THEN 10 
40 A=(ASC(A$)-132*2-1:IFA>8 
THEN A=A-7 

50 PRINT "FUNCTION KEY 
";A;" IS PRESSED" 
60 GOTO 10 

This short routine will scan for 
all eight function keys. By 
adding the following line it is 
also possible to add four 
function keys by using the 
Commodore key as an extra 
shift key. 

45 IF PEEK <653)=2 THEN 
A=A/2+8 

Reading the function keys in 
this manner is extremely simple 
as each of the keys returns a 
unique number to the GET 
instruction in line 10. 

Below is a program which 
will allow you to actually store 
strings of characters on each 
key, the strings can either be 
keywords or strings of your 
own choosing. 

Sixteen re-definable keys 
are catered for and these are 
obtained by pressing F1,F3,F5 



and F7 with no shift, the Com- 
modore key or the control 
key. 

The whole program is based 
on interrupts and can be 
switched on by: 

SYS 49152 

and off by: 

SYS 49155 

When the program is first 
loaded the keys are set to: 

F1 SYS 49158 
F2 SYS 49155 
F3 RUN + Rl 
F4 POKE 
F5 LIST 
F6 PEEK( 

F7 LIST + RETURN 

F8 ?PEEK( 

F9 MID$( 

F10 LEFT${ 

F11 RIGHTS) 

F12 LEN( 

F13 53248 

F14 54272 

F15 LOAD 

F16 SAVE 

The function of each key 
can be changed by either 
pressing F1 or typing SYS 49158 
followed by the text in 
quotation marks, a comma and 
then the key number. The text 
stored on each key can be no 
more than 10 characters and 
the key number no greater 
than 16. F1 and F2 cannot be 
changed since they hold the 
important SYS calls. 

Here are a few examples: 

SYS 49158 "P[s 0]53281,0",7 

This will POKE 53281 with 0. 

SYS 49158 "LOAD"+CHR$(34)+ 
"S"+CHR${34)+"8-",5 

This will type LOAD "$",8 and 
execute a return. 

If you wish to add a RETURN 
onto the end of any function 
you must put a left hand arrow 
as the last character in the text 
when defining the function. 

Below you will find the M/C 
source file and a basic loader. 



1000 
1010 
1020 
1030 
1040 
1050 
1050 
1070 
1080 
1030 
1100 
1110 

1120 

1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1250 
1270 
12B0 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
13B0 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 



DEFINE FUNCTION KEYS *** 



* 

IRQ0UT 

KEYSKN 

KEYBUF 

KEYQUE 

IRQUEC 

PRINT 

SHIFT 

BASIC1 

BASIC2 

BASIC3 

BASIC4 

BASICS 

NUMBER 

STRING 



JMPTB2 JtlP IRQON 
JHPTB3 JMP IRQQFF 
JI1PTB1 JMP KEYDEF 





49152 




59953 




197 




631 




13B 




7BB 




654S0 




653 




44797 




44426 




47095 




44446 




46755 




20 




34 


- 
» 




• 





IRQON 



SEI 
LDA 
STA 
LDA 
STA 
CLI 
RTS 



#< IRQ 
IRQUEC 
#> IRQ 
IRQUEC+1 



I SWITCH ON NEW 
; IRQ CF KEYS) 



IRQOFF SEI 

LDA #<IRQ0UT 
STA IRQUEC 
LDA #>IRQ0UT 
STA IRQUEC+1 
CLI 
RTS 



IRQ LDA KEYSKN 

CMP TEMPI 



SWITCH OFF 
NEW IRQ AND 
REPLACE THE 
OLD UECT0RS 



; CHECK TO SEE 
; IF KEY HAS 



Letters 




1490 
1500 
1510 
1530 
1530 
1540 
1550 
1560 
1570 
15B0 
1590 
1600 
1610 
1680 
1630 
1640 
1650 
1560 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 

ieeo 

1B30 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
19B0 
1990 
2000 
2010 
8020 
2030 



BNE 
JtIP 

OK LOA 
BED 

cnp 

BEQ 

cnp 

BEQ 

cnp 

BEQ 

jnp 



NDERRl LDA 
NDERR STA 
LDA 
STA 

cnp 

BNE 
LDA 

NOTODD SEC 
SBC 
STA 
LDA 

cnp 

BCS 

jnp 

□K03 cnp 

BCC 

jnp 

□K04 LDA 
STA 
LDX 

NXTKEY BEQ 
LDA 
CLC 
ADC 
STA 
DEX 

jnp 

FOUNDK LDX 
NXTSHF BEQ 
LDA 
CLC 
ADC 
STA 
DEX 
JHP 



OK 

IRQOUT 
SHIFT 
NDERR 
ttl 

NDERR 
#2 

NDERR 
#4 

NDERRl 
IRQOUT 



#3 

TEnP3 
KEYSKN 

TEnpi 

#3 

NDTDDD 
«7 

tt4 

TEnP2 

KEYSKN 

#3 

0K03 

IRQOUT 

B7 

DK04 
IRQOUT 

WO 

TEnP4 
TEnP2 
FDUNDK 
TEnP4 

#10 
TEnP4 

NXTKEY 
TEnP3 
FOUNDS 
TEnP4 

#40 
TEnP4 

NXTSHF 



; REPEATED 

; CHECK FDR TWO 
;0R nORE SHIFT 
; KEYS PRESSED 



; FOUND nDRE 
; THAN ONE KEY 
; IS PRESSED 

; STORE ALL THE 
; INFO 



; FIND THE TEXT 
; FDR EACH KEY 
; PRESSED 

; ADD 10 TD THE 
; POINTER 
i EB. 10 CHARS 
;PER KEY 



; ADD 40 TO THE 
i POINTER 
; EG . 40 CHARS 
;PER FOUR KEYS 
;EQU 1 SHIFT 



TEXT NOD FOUND 

FILL BUFFER WITH TEXT 



2040 


FOUNDS 


LDX 




Pi IT nATO TMTD 


2050 




LDY 


TEnP4 


KFYRriARfl 

r»l_ I Ol_J M l\ U 


2060 


NXTCHR 


LDA 


DATA Y 


RI IFFFR 


2070 




cnp 


ft 1 • - * 


f t i\in * • — 1 flMn 


2080 




BNE 


NDRETN 


PFPT APF III T TH 


2090 




LDA 


ftl3 


( RFTI IRN*l 


2100 


NORETN 


STA 


KEYBUF X 




2110 




I NY 






2120 




I NX 






2130 




CPX 


ftlO 

1* AV 




2140 




Rrr 


NXTfHP 




2150 






KFVHMIF 


cct ni ici ip t cm 
-31- i UULUL LC.PJ 


2160 




jnp 


IRQDUT ; 


ALL DONE' 


2170 


KEYDEF 


JSR 


EASrC4 

unw a. a _ 


PI II 1 STP rMR 


2180 




JSR 


BASIC5 ; 


FRon input 

* *WJ' 1 A 111 LJ A. 


2190 




cnp 


ttll ;' 


CHECK LEN 


2200 






LENOK 




2210 


SYNTAX 


LDX 


ttO ; 


PRINT ERROR 


2220 


NEXTCR 


LDA 


nESSA6,X 




2230 




BEQ 


DONE 




2240 




JSR 


PRINT 




2250 




INX 






22S0 




jnp 


NEXTCR 




2270 


DONE 


RTS 






2280 


LENDK 


STA 


TEnP5 : 


STORE LEN 


2290 




LDX 

L— U f\ 


ftO ; RESET TnPKEY 


2300 




LDA 


ttO 




2310 


BACK01 


STA 


TnPKEY , X 




2320 




INX 






2330 




CPX 


ftlO 




2340 




BCC 


BACK01 




2350 




I DY 

1— U 1 


ttO 


; STORE STRING 


2360 


BACK02 


LDA 


(STRING), Y 




2370 




STA 


TnPKEY , Y 




2380 




INY 

A 1 V 4 






2390 




CPY 


TEnPS 




2400 




srr 


BACK02 




2410 




ISP 


BASIC1 


; GET NUnBER 


2420 




JSR 


BASIC2 


; INPUT 


2430 




JSR 


BASIC3 


; EG, KEY ND . 


2440 




LDA 


NUnBER 




2450 




cnp 


ft3 




2450 




BCC 


ERROR 




2470 




SEC 






2480 




SBC 


ttl 




2490 




cnp 


#16 


; CHECK ND. 


2500 




BCC 


RITNUn 




2510 


ERROR 


jnp 


SYNTAX 




2520 


RITNUn 


cnp 


#7 


; F IND WHERE 


2530 




BCS 


NDNEED 


; TO PUT 


2540 




TAX 




; INFD FOR 


2550 




LDA 


Dunny.x 


; KEY 


2560 


NONEED TAX 






2570 




LDA 


#0 




2580 




STA 


TEnP5 






L OUTPUT 



Machine code (continued) 



3590 

2500 

2610 

2620 

2630 

3640 

2650 

2660 

2670 

2680 

2690 

2700 

2710 

2720 

2730 

2740 

2750 

2760 

2770 

2780 

2790 

2800 

2810 

2820 

2830 

2840 

2850 

2860 

2870 

2880 

2B90 

2900 

2910 

2920 

2930 

2940 

2950 

8960 

2970 

2980 

2990 

3000 

3010 

3020 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 

3130 

3140 

3150 



UJOli; 



FOUND 
LAST 



TEMPI 
TEMP2 
TEMP3 
TEMP4 
TEMP5 



on in 
.BYT 
. BYT 
.BYT 
.BYT 



.BYT 
. BYT 
.BYT 
.BYT 



CPX 
BEQ 
LDA 
CLC 
ADC 
STA 
DEX 

jnp 

LDX 
LDY 
LDA 
STA 
INX 
INY 
CPX 
BCC 
RTS 



BRK 
BRK 
BRK 
BRK 
BRK 



#0 

FOUND 
TEMP5 

#10 
TEMP5 

UJOU 

#o 

TEflPS 
TMPKEY , X 
DATA, Y 



#10 
LAST 



; ADD TEN FOR 
; EACH KEY 



; STORE IN ITS 
; RIGHT PLACE 



;FOR THE KEYS 
SYS4915B ',0 
RUN'-* ,0,0,0,0,0,0 
■LIST', 0,0,0, 0,0,0 
LIST'- ' ,0,0,0,0,0 



KEY1 
KEY3 
KEY5 
KEY7 



NOW F1-F7 WITH SHIFT 



SY549155 1 ,0,0 
7PEEKC ' ,0,0,0,0 
GOTO ' ,0,0,0,0,0,0 
'GOSUB ' ,0,0,0,0,0 



KEY1 
KEY3 
KEYS 
; KEY7 



;N0W F1-F7 WITH CBM KEY X- 



.BYT 'MIDSC ' ,0,0,0,0,0 

.BYT ' LEFTIC ' ,0,0,0,0 

.BYT ' RIGHTSC * ,0,0,0 

.BYT ' LENC ' ,0,0,0,0,0,0 



; NOUJ F1-F7 WITH 



.BYT '53248' ,0,0,0,0,0 

.BYT '54272 ',0,0, 0,0,0 

.BYT ' LOAD \ 0,0, 0,0,0 

.BYT 'SAUE ',0,0,0,0,0 



KEY1 
KEY3 
KEY5 
KEY7 

KEY 

KEY1 
KEY3 
KEYS 
KEY7 



TMPKEY .BYT 0,0,0,0,0,0,0,0 

DUMMY .BYT 0,4,1,5,2,6,3,7 

MESSA6 .BYT ■ ERROR IN INPUT ',0 
.END 




100 P0KE532B0,0:PDKE532B1,0 
110 PRINT"CCLEAR3CRIGHT3CRIGHT3CRI 
GHTDCRIGHTDCc 53THI5 IS THE BASIC 
LOADER FOR " 

120 PRINT"CD0UN3 16 FUNCTION K 

EYS & DEFINER 

130 PR I NT "C DOWN] CO A.CROU 

THER 1985 

140 PR I NT "C DOWN} C DOWN: CUHITE3 TO 

BOOT - SYS 49152 

150 PRINT"CD0UN3T0 SWITCH OFF - S 
YS 49155 OR F2 

160 PRINT"CD0UJN3 TO DEFINE - S 
YS 4915B "CHRSC34)"TEXT"CHRSC34V\ 

ncs un 

170 PRINT"CD0UIN3Cc 43 "CHR$C34r'TE 
XT"CHR$C34r' - 0 TO 10 CHARS LONG 
180 PR I NT "C DOWN 3 NCs U3 - 3 TD 

16 FUNTION NUMBER 
190 PRINT"CDOWN3CRED3 "Cc 
53NDTE 1 & 2 ARE UNCHANGEABLE 
200 PRINT"CBLUE3CDOUN3CDOWN3CDOUJN3 

LOADING " 

205 C-494:C$-"C BLACK: Cc 43Cc 53Cc 
B3CUIHITE3Cc B3Cc 53Cc 43":D-1 
210 LI-1000:F0RI-49152T049645STEP9 
220 T-0 : FOR J-OTOB : READA : T-T+A : POKE 
I+J, A 

225 print"chor1e3cddwn3cdoujn3cdouin3 
c doujnd c d0un3 c d0ujn3 c doujn] c ddlun3 c dou 
n:cdoujn:cdouj 

n3cddun3cdqun3cd011jn3cdoujn3cdou1n3cd 

0UN:CD0UN3I:D0UN3CD0UJN3CD0UJN3"TABC2 
0)C"CLEFT3 " 
; :C-C-1 

226 D-D+l: IFD-9THEND-1 

227 PR INTrll DSCCS , D , 1 ) : NEXT 

230 READA: IFA<>TTHENPRINT"CCLEAR3C 

LUH I TE3 ERROR IN " ; LI : PR I NT "L" BLACK 3 L 

IST"LI"CWHIT 

E3":G0T0260 

240 LI-LI+10:NEXT 

250 P0KE532B1 , 1 : PDKE53280, 1 : PRINT" 

C CLE AR 3 E BLACK 3 " ; : END 

260 P0KE198,3:P0KE631, 19:P0KE632,1 

7:P0KE633,13:END 



Basic Loader continued 



1000 DATA76 ,9, 192 , 7B , 22 , 198 , 76 , 172 
, 192, 1007 

1010 DATA 120 , 169 , 35 , 141 , 20 , 3 , 169 , 1 
92, 141,990 

1020 DATA21 ) 3,B8 1 96, 120, 169,49, 141 
, 20 , 707 

1030 DATA3 , 169 , 234 , 141 , 21 , 3 , 8B , 96 , 
165,920 

1040 DATA197 , 205 , 43 , 193 , 208 , 3 , 76 , 4 
9,234,1208 

1050 DATA 173 ,141,2, 240 ,17,301, 1,24 
0, 13, 102B 

1060 DATA201 , 2 , 240 , 9 , 201 , 4 , 240 , 3 , 7 
6,976 

1070 DATA49,234,169,3, 141,45. 193,1 
65,197,1196 

10B0 DATA141,43,193,201,3,208,2,16 
9,7,967 

1090 DATA56 , 233 , 4 , 141 , 44 , 193 , 165 , 1 
97,201, 1234 

1100 DATA3 , 176,3,76,49,234,201,7, 1 
44,893 

1110 DATA3, 76, 49, 234, 169,0, 141,46, 
193,911 

1120 DATA 174 , 44 , 193 , 240 , 13 . 173 46 
193,24, 1100 

1130 DATA 105 , 10 , 141 , 46 , 193 , 202 , 76 , 
111,192,1076 

1140 DATA 174 , 45 , 193 , 240 , 13 , 173 , 46 
193,24, 1101 

1150 DATA 105 , 40 , 141 , 4E , 193 , 202 , 76 , 
129. 192, 1124 

1160 DATA162.0, 172 , 46 , 193 , 1B5 , 4B , 1 
93, 201 . 1200 

1170 DATA95,208,2, 169, 13, 157, 119,2 
,200,965 

1180 DATA232.224, 10, 144,238, 134, 19 
8,76,49, 1305 

1190 DATA234 , 32 , 15B , 173 , 32 , 163 , 182 
,201, 11 , 1186 

1200 DATA144, 15, 162,0, 189,224, 193 
240,7, 1174 

1210 DATA32,210,255,232,75,184,192 
,96, 141 , 141B 

1220 DATA47 , 193 ,162,0,169,0, 157 , 20 
B, 193, 1129 

1230 DATA232 , 224 , 10 , 144 , 24B , 160 , 0 , 
177,34, 1229 

1240 DATA153 , 208 , 193 , 200 , 204 , 47 , 19 




3, 144,245, 1587 

1250 DATA32 , 253 , 174 , 32 , 138 , 173 , 32 , 
247, 183, 1264 

1260 DATA165, 20, 201, 3, 144,7,56,233 
, 1 , B30 

1270 DATA201 , 16 , 144 , 3 , 76 , 182 , 192 , 2 
01,7,1022 

1280 DATA176.4, 170, 189,216, 193, 170 
,169,0,12B7 

1290 DATA141 , 47 , 193 , 224 , 0 , 240 , 13 , 1 
73,47,1078 

1300 DATA193.24, 105, 10, 141,47,193, 
202,76,991 

1310 DATA8, 193, 162,0, 172,47, 193, IB 
9,208, 1172 

1320 DATA 193 , 153 , 48 , 193 , 232 , 200 , 22 
4,10,144,1397 

1330 DATA244,96,64,60,0, 10,70,83,8 
9 , 716 

1340 DATA83 , 52 , 57 , 49 , 53 , 56 , 32 , 0 , 82 
, 464 

1350 DATA85,7B,95,0,0,0,0,0,0,258 
1360 DATA76, 73,83,84, 0,0,0,0,0, 316 
1370 DATAO, 76, 73, 83,94,95,0,0,0, 41 

1380 DATAO, 0,83, 89, B3, 52, 57, 49,53, 
466 * ' 

1390 DATA53,0,0,63,BO,69,69,75,40, 
449 

1400 DATAO, 0,0, 0,71, 79, B4, 79, 0,313 
1410 DATAO, 0,0, 0,0, 70, 82, 69, 68,289 
1420 DATAO , 0 , 0 , 0 , 0 , 0 , 77 , 73 , 68 , 218 
1430 DATA36.40.0, 0,0, 0,0, 76, 69,221 
1440 DATA70,84,36,40,0,0,0,p,82,31 

1450 DATA73,71,72,B4,36,40,0,0,0,3 
76 

1460 DATA75,69,7B 1 40,0,0,0,0,0,263 
1470 DATAO, 53, 51, 50, 52 ,56,0,0,0,26 

14B0 DATAO, 0,53, 52,50,55,50,0,0,26 

1430 DATAO, 0,0, 76, 79, 65, 68,32, 0,32 
0 

1500 DATA0,0,0,0,83,65,86,69,32,33 

1510 DATAO , 0 , 0 , 0 , 0 , 70 , 82 , 69 , 68 , 289 
1520 DATAO, 0,0, 0,0, 0,1,5,2,8 

1530 DATA6, 3,7,69,82,82,79,82,32,4 

42 

1540 DATA73 , 78 . 32 , 73 , 78 , BO , 85 , 84 , 0 
. 5B3 
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FRANKIE COMES TO CRICKLEWOOD, 
or anywhere else for that matter, 
packaged in a smart box with a free live 
recording of the band performing their 
hit song Relax so you can boogie while 
you plan your next move in the game. 

As programs go, this has a lot to offer 
and the inclusion of games within games 
reminds me slightly of Terminal's Lazy 
Jones but this has all the whistlesand bells 
that Jones lacks. It is streets ahead of any 
opposition and that's not just because it's 
set amongst the housesof Mundanesville. 

The idea is to reach the title screen, a 
typically contrary Frankie-style idea, to do 
this you have to visit all the houses in 
every street of Mundanesville to find 
objects which will help you to complete 
the mini games. Really the things people 
keep in their draws! Old fish, pleasure 
pills, pistols and video cassettes. 

Talking of videos, these play a vital part 
in the story. Place a cassette in a handy 
video machine and it reveals a portion of 
one of the mini games. You are then free 
to enter the screen. . .but I'm giving away 
the plot. 



Why do you have to enter the mini 
games? What is the fiendish purpose 
behind it all? Before you can enter the 
final screen you must complete your 
personality. For the purpose of the game, 
personality is composed of four facets: 
pleasure, war, love and faith. Each facet is 
represented by a symbol at the right hand 
side of the superb 3D graphic screen and 
each pleasure pill looks like the symbol to 
which it relates. As the game progresses 
you gain points in one or more of the 




screens for successful results and lose 
points for failure in the mini games. This is 
shown by growing and shrinking columns 
above the relevant symbols. Points are 
also awarded for various finds in the 
houses. Occasionally, Frankie will 
interrupt with a comment which tells you 
how your personality is developing as a 
percentage just to cheer you along. 

One of the rooms has a locked door 
which is the entrance to the Corridors of 
Power forming the Pleasure Dome. This is 
where the mini games are located and 
once you have unlocked the door, 
mapped the maze and fully developed 
your personality the final door will be 
found here, but be careful the maze of 
corridors is full of traps for the unwary. 

In one of the houses there has been a 
murder and once you have discovered 
the body you are given clues to the 
murderer's identity and you must not re- 
enter that room until you have discovered 
who the felon is. Each time you play the 
game you will find a different corpse and a 
new killer. 

I will not reveal the nature of the mini 
games except to say that there are more 
than 10. Ocean claims that there are 60 
problems to solve in all and I believe 
it. After hours of searching and bat- 
tling the best rating I achieved was 60% 
personality. In my opinion this game 
should rank alongside the best C64 titles 
and every owner should have it in their 
collection. |.C. 




A SKULL, SCORPIONS AND SPIDERS, A 
ghostly graveyard and gorillas, knights in 
castles and chests are some of the things 
you will encounter in the Lands of Havoc. 

Sador (the player), a reptile in the 
shape of a man, has come to save the land 
of Haven from the Dark Lords. His first 
quest is to seek the Book of Change 
hidden deep in the village. The Book will 
reveal the whereabouts of the chest 
which contains directions to the Dark 
Lords. 

Sador will have to fight and kill to 
collect the means to protect himself,such 
as a Talisman from the Mystics and a key 
from the Garden, before he can enter the 
Skull in the Wild Wood and destroy the 
Dark Lords. If he strays into the Wild 
Wood too soon he will become paralysed 
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- end of game! Only after many hours of 
play will the final secrets of the Dark Lords 
be revealed. 

This maze type game is of the Sabre 
Wulf variety. Nine cards map out the 
maze when laid in sequence (2000 com- 
binations). Half the fun is finding the aim 
of the game arid the other half re- 
arranging the cards in the correct 
sequence at the beginning of each game 
(this happens very often . until you 
become experienced). The bottom right- 
hand corner of the screen has the initials 
of each card in the pattern they are set out 
on the table. The redefined character-set 
makes them almost indecipherable and 
the pattern is unclear as two of the cards 
have the same initial. 

Once defeated the player is informed 
of his percentage through the game 
before being included in the Hall of Fame 
(if he's lucky). The game loads in under 
three minutes and has high quality 
graphics. There are eight levels of play, 
each with an easier/difficult option. The 
music is excrutiattng and should be 
turned off immediately using the F3 key. 




WITH THE AVAILABILITY OF CHEAP 
printers, so-called business software is 
being bought increasingly for home use, 
and here we have a fully integrated 
word processo r, database and 
spreadsheet package at an incredibly low 
price! 

The program is very comprehensive 
and easy to use, although the slender 
"manual" provided with it would be 
woefully inadequate to anybody 
unfamiliar with the processes involved. 
This is a shame, as the software is 
unbeatable in terms of pure value for 
money. 

The wordprocessor uses the standard 
40 column screen, with words being 
broken off at the ends of lines as you type. 
This is corrected at the printing stage, but 
it does mean that you cannot see the 
finished article on the screen before 
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Here and There with the Mr Men 
* * * 

Mirrorsoft 

£7.95 



HERE WE HAVE A SUITE OF FOUR PRO- 
grams intended to give four to eight year 
olds practice in distinguishing left, right, 
up and down - a concept young children 
find difficult. An element of route- 
planning is also involved. The popular Mr 
Men are used throughout and the 
graphics, though simple, are very 
effective. 

In Mr Tickle's Jigsaw Puzzle the U, D, L 
and R keys (or the function keys) are used 
to move doorways in the sides of a box 
until they are lined up with pieces of a 
jigsaw puzzle which stand outside. When 
the alignment is correct the pieces move 
in and build up a picture of Mr Tickle. The 
jigsaw pieces are very small and do not 
line up centrally with the doorways, so the 



game becomes harder than need be. 
Children whom I asked to try it soon 
found it tedious. 

Mr Tickle and Mr Grumpy on the 
other hand, is excellent and quite the best 
of the four games. Mr Grumpy is inside 
the box with the same four doorways and 
Mr Tickle's extending arm needs to reach 
in to tickle him. To achieve this, the 
doorways can be moved as before, then 
Mr Tickle must be programmed with a 
sequence of instructions for moving his 
arm along the required route. On later 
levels, chairs appear in the doorways, 
adding to the challenge. If preferred, the 
directions for movement can be given 
individually. 

In Mr Lazy the idea of branching to left 
or right is introduced as you guide a worm 
up a tree to a red apple. If you are 
successful he will drop the apple into the 
mouth of Mr Lazy, who is sleeping below. 
Another good game. 

Mr Men versus Mr Tickle is the 
poorest of the games in that it is almost 
impossible to lose! You control four Mr 
Men, moving on a draughts board, who 
try to trap Mr Tickle. It could be quite 
good, but unfortunately Mr Tickle's 
movements are often rather stupid and he 
rarely wins. 

Taken as a whole, the program is fairly 
good, though nothing special. It is 
certainly not up to Mirrorsoft's usual 
standard of educational games. 

P.R.B. 
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printing. Special commands are accessed 
logically and easily using the CTRL key, 
and most of them work very well. A slight 
problem is that only whole lines of text 
can be highlighted and moved, but I did 
not find this a major drawback. Tabs, also, 
were a bit quirky at times. 

Part of the machine's memory is set 
aside as a "clipboard" or workpage, so 
that chunks of text can be merged at will, 
and there is an option for printing 
globally, so that whole documents may be 
linked together in sequence. A wide 
range of printing options is provided, 
including centring and justification. 
These are accessed through the familiar 
"format lines". There are also built-in 
commands for underlining and italic 
printing, available on Epson and similar 
printers, though these are misprinted in 
the manual. 

The database is about the easiest to use 
that I have seen though it is somewhat 
limited. The program will not sort records 
into alphabetical or numerical order. Nor 
is it possible to scan through an entire file, 
less you set aside one of the 17 
itted fields as a dummy, used just to 



access the records. Nevertheless, as a 
simple address book or similar database it 
is very good and has a particularly 
versatile procedure for print formatting. 

The spreadsheet, or financial planning 
section of the program is excellent, 
although it is here that the novice would 
find most difficulty in following the 
manual. A rather involved system of 
relative addressing is used when entering 
formulae, and the explanation given is 
very thin indeed. 

All the sections of the package are fully 
integrated, so database and spreadsheet 
files can readily be incorporated into 
wordprocessor documents. If you run 
into difficulty, a "help" key is provided, 
which puts an explanatory windowon the 
screen. The information given, however, 
usually just duplicates the inadequate text 
of the manual. 

With proper documentation, tutorial 
and sample files this package would 
warrant five stars. As it stands, it is still very 
good, especially when you consider that it 
is only a quarter of the price of 
comparable software. Well done, Argus 

P.R.B 




Cave Fighter 
* ★ ★ 

Bubble Bus 

£6.95 
C16- 



I HAD TO BORROW TWO CASSETTE 
players before I finally managed to get this 
game to load - and then only from one 
side! It's a slow loader (very) so there 
doesn't seem to be any real reason for 
this. However, I succeeded in the end, so 
here goes! 

You are deep in the heart of a system 
of caves, from which you are trying 
desperately to escape before your energy 
is exhausted. The caves are infested with 
bug-eyed monsters, bottomless lakes and 
pits filled with what look like sharpened 
stakes, contact with which spells instant 
death! Fortunately you have nine lives, 
like a cat, but I guarantee that you will 
need every one of them. 

To escape you will need to run, jump, 
shin up ropes and shoot aliens- in fact it is 
a fairly standard platform game, with a 
scrolling screen display. The controls are 
rather unusual, as you jump only after 
you release the fire button - the height 
varies according to the length of time you 
held the button down. Shooting presents 
no problems, as you fire automatically in 
whichever direction you are moving. 

There are eight levels, with six caves in 
each level, and getting through is really 
challenging! 

The graphics are excellent, though the 
colours are rather muted. Some of the 
aliens are especially good and move very 
smoothly, almost like sprites. The title 
page displays the three highest scores and 
gives the option of restarting at the level 
reached in the previous game. It is 
accompanied by a rendering of The Star- 
Spangled Banner in very erratic tempo. 
Generally, the sound effects are poor - I 
ended up turning the volume right down. 

The game is quite good, but doesn't 
really shine in any way, and I quickly tired 
of it. 

P.R.B 
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I'M A -BLAST THE GRIEF OUT OF ANY- 
thing that moves" addict, so when I was 
asked to review this adventure I thought 
the intergalactic battle was over. So you 
can imagine that I loaded Mordon's 
Quest with some trepidation, especially as 
there wasn't even the slightest hint of any 
graphics. I was in for a more than pleasant 
surprise. 

Mordon's Quest, by Melbourne 
House, has been written by Peter (don't 
you dare give my phone number to 
anyone) Morland, who also wrote Classic 
Adventure. 

It is said by the publishers to be "an 
extremely complex text adventure". They 
were dead right about it being text but 
they were definitely being underhand by 
using the word "complex". I could think 
up much more graphic superlatives to 
describe its twists, turns and generally 
dastardly tricks and absolutely mind- 
bending puzzles. As I said, I could be 
much more graphic in my description, but 
this is supposed to be a family show! 

Like any other text game the computer 
acts as your eyes, ears and hands and is 
only limited by the 500 words which it 
understands; which, when you come to 
think about it, is an awfully large 
vocabulary. However, this has been 
accomplished by using that well known 
"text compression" system allowing the 
author to be very descriptive as you travel 
through the 150 locations which have 
been cleverly mapped to look like... but 
that would be telling. Typing in 'help' will 
point you in the right direction. 

The game starts with you, as the 
possible answer to any Jack-the-lad 
wizard's prayer, falling out of bed. Your 
quest is to save the universe, as if you 
hadn't guessed already. 

On your journey you will come 
across said wizards, matricidal midgets 
who are heavily into magic mushrooms, 
and loin cloth clad, human apes, with a 
strange sense of humour, to name but a 
few. All you've got to do is collect several 
parts of a machine which will defeat the 
young and foolish Bostafer who is bent on 
immortality at the expense of our total 
destruction. 

All this is delivered in such a way that 
you could be forgiven for believing that 
you're actually there. I kid you not, this 
game with its brilliant descriptions of 
sequences, events, and locations has got 
to be a must for any software library, even 
if you think your forte is "if it moves funk 
it". 

Go out and buy this, you will know it 
made sense. 

D.F. 



SOFTWARE THAT GIVES A LIMITED 
amount of French lessons is the latest 
offering from Activision. Based on the 
Tour de France bicycle race the game 
boasts some interesting and well planned 
graphics. I was particularly impressed with 
the bicycle movements which allow pixel 
to pixel movement in any direction as the 
route demands. With each slight 
movement the sprite appears to change 
shape accordingly giving an extremely 
convincing 3D effect, probably the best I 
have seen. 

The game is complex to load because 
you are given the choice of completing 
the full Tour or selecting individual stages 
which are then loaded from data sections 
on the tape. This means that once you 
have completed your chosen selection a 
new game involves reloading the whole 
program again. Not knowing how the 
program was written I do not understand 
why it is not possible to be able to rewind 
the data section of the tape and reload a 
new selection. No doubt there is a reason 
but I would have preferred it to be 
otherwise. 

Another little quibble relates to the 
fact that although the race can be 
controlled by the keyboard, the selection 
of bicycle and country of the player must 
be made with a joystick. Surely a small 
amount of extra thought could have 
released the user from the need to use the 
joystick at all. I found that the response 
from the keyboard was better than that 
from the joystick and that the control of 
the bicycle was easier. 

Having got those gripes off my chest I 
shall continue with my description of the 
game. Up to six players can enter the race 
but each must complete a section in turn. 
Why the programmer bothered to 
include the option for a practice mode I 
do not understand because once practice 



mode is chosen you must reload the tape 
to switch to competition mode. I found 
that by selecting competition mode with 
six players gave me plenty of time to 
experiment with different types of cycle 
and perfect the technique of staying on 
the road. 

To pedal your bike you must press two 
keys alternately or waggle the joystick 
back and forth. The energy expended to 
do this will not give you wrist ache like 
some sport simulations but it does make 
you concentrate. Direction is controlled 
by two separate keys or by moving the 
joystick left or right with the fire button 
pressed and you can even select one or 
two gears as the terrain demands. 

French is used throughout the 
program but most of it can be deduced 
without any prior knowledge of the 
language and who knows you may learn a 
thing or two. 

At the beginning of each etape (stage) 
a screen is given which allows you to 
select keyboard or joystick operation and 
it also permits you to select another bike. 
Each bike has different qualities but it is 
up to the user to find oul what these are. 

This means that if you want to change 
your mode of control or try a new vehicle 
in mid-race you can do so at the next rest 
point between etapes. 

When I first played thisgame I thought 
it was dull but when I discovered the 
target time for each section on the title 
screen for each etape, I became 
engrossed in pedalling like fury avoiding 
collisions with the grass verge so that I 
didn't waste time picking myself and my 
bike up off the floor in an attempt to beat 
the record time. This added a distinct 
edge to my one player game and I can see 
how the multi-player game could become 
addictive. 

At the end of the game you can load a 
summary screen which displays each 
player's overall score and gives a 
breakdown of individual performances. 
I'd like to say more but it wouldn't load on 
my version so I'll take Activision's word 
for it. 

fc£i 




AMAZE YOUR FRIENDS ON THE 19TH 
tee with the casually dropped remark, "I 
hit a 75 at the Royal St George's Club in 
Sandwich this morning". 

Golf addicts and armchair critics alike 
should enjoy taking up the challenge of 



one of the most difficult courses in the 
country. 

Using either the keyboard or joystick 
you can view a detailed plan of each hole 
so all you need to do is select the right 
club (with guidance from your caddy!), 
pick the direction in which you wish the 
ball to go and choose the appropriate 
strength for the required distance you 
wish the ball to travel. Then, adjust for 
wind direction and speed and hey presto 
your animated golfer will hit the ball. If all 
that sounds a bit too easy for you there is 





THIS GAME HAS AN UNUSUAL STORY- 
line in that you start off dead! You play the 
part of Kelok - not the cornflake 
manufacturer but the well-known warrior 
of the Eastern Region. No, you don't work 
for Anglia Television either! 

You have been killed by Xorphas, a 
warlock of the worst kind, and he has 
stolen your heart away. "Have a heart!" 
you said, and he just took it, doubtless to 
use in some of his unnatural practices! 
So you are doomed - doomed to wander 
forever in the Abyss of Death, doomed to 
the torment of death without peace. 
Somewhere in the succession of eerie 
caverns lies your lost heart, which you 
must regain if you are ever to find rest. 

To help you in your quest, you are 
armed with the famous Sword of Destiny. 
A strange sword, this, as it hurls bones at 
people - or perhaps they are 
thunderbolts. You use it to despatch the 
vile guardians of death, an assorted bunch 
of bats, ghosts and grinning skulls, and by 
sending them packing you replenish your 
energy a little. Collect any flashing 
artefacts and you open up further cave 
sections, but do watch your energy, or 
astral power level. You only have one life, 
or rather death, to play with. 

To sum up, you must run about and 
jump from level to level, collecting 
anything which flashes and bumping off 
ghosties, ghoulies and things that go 
bump in the night, trying to find your 
poor bruised heart. The task isn't easy - it 
took me several attempts before I even 
qualified for the high-score table - but at 
least you get some help from the hot-air 
flues, which enable you to leap to 
amazing heights! 

Here we have yet another great game 
from Gremlin Graphics - it's well worth 
buying. 

P-R.B. 




DORKS, AS EVERYONE KNOWS, COME 
from Dorking, but this one is far from the 
heart of rural Surrey. His spaceship has 
crashed on the planet of the Zobwats and 
is scattered to the four winds, or at least to 
the 25 mazes. "What is a Zobwat?" 
I hear you ask. Elementary, my dear 
Watson - it is nothing more than a 
Tawboz spelt backwards, but it can take 
many forms, all of them nasty! 

If you are wondering whatever I am 
dorking about, let me explain. The aim of 
the game is to collect a piece of spaceship 
from each of the 25 chambers, then 
reassemble them. To collect these 
components, all you need to do is to kill a 
minimum of 10 Zobwats in each chamber. 
The method of killing is easy. You drop a 
bomb when they are close to you, then 
you dork out of the way pretty sharpish! 
The trouble with Zobwats is that they tend 
to surround you in a corner, so you can't 
get away after dropping a bomb. You have 
four lives, however, so it isn't as bad as it 
sounds. Some of the chambers are rather 
cramped, making it difficult to 
manoeuvre, and you start in a different 
room each time you play, so it is hard to 
work out a technique for dealing with 
each one. 

Gremlin Graphics has produced 
some really excellent games for the C16 
and Plus/4, and this is no exception. 
Complete with high score table, joystick 
or keyboard options, sound on or off, it is 
a thoroughly professional piece of 
programming. The graphics are colourful 
and varied, and the sound effects are just 
right. 

The game is entertaining, and 
challenging enough to maintain interest. 
One word of advice - don't rush around 
too much, but be patient and you can 
achieve a very high score. 

P.R.B. 



also a 'fine tune' which allows you to 
make last minute adjustments to the 
strength and direction of the shot as your 
golfer swings his club through the air. 

You can then watch the ball fly across 
the screen and land on the fairway, or the 
rough, or the bunker, or the water 
hazards or even go out of bounds! The 
usual everyday frustrations of the 
handicap golfer prevail. At least you have 
the consolation that if you miss a two foot 
putt no one else is watching. 

The weekend hackers and club handi- 



cap players alike will relish the chance of 
pitting their wits against an open 
championship course. Even those of you 
with no golfing experience should 
quickly learn enough of the rudiments of 
the game to play many enjoyable hours 
trying to hit a small white ball into a small 
white hole. This game is easy to learn but, 
like real golf, it's difficult to master. Holes 
in one, eagles, birdies and pars are all 
attainable but beware - bogey's abound 
in plentiful supply for the unwary. 

P.T. 
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Thing on a Spring 
* * * * 
Gremlin Graphics 



IT'S A LONG TIME SINCE WE HAVE SEEN 
any C64 games from the stable of such 
classic games as Monty Mole and Potty 
Pigeon. However, Gremlin Graphics has 
now returned with vengeance with what 
is sure to be its latest chart topper - Thing 
on a Spring. 

As ever your mission is to rid the World 
of some evil that has been unleashed 
upon it. This time, however, it's not the 
usual mad scientist or the Warsaw pact 
that you're out to stop, it's an evil goblin 
who is trying to rid the world of all its 
treasures. 

This time you don't play the role of a 
tank commander or a superhero instead 
you find yourself quite simply as a Thing 
on a Spring. 

Platform games have certainly become 
as common as Space Invaders, and it's 
quite a surprise that Gremlin Graphics has 
released yet another one onto the market. 
Don't worry though, this isn't your run of 
the mill platform game it's far superior to 
most that have been launched recently. 

Controlling Thing is no easy task, 
being a spring he tends to bounce around 
quite a lot, if you're not careful you'll find 
him bouncing right into the clutches of 
some evil monster who will reduce the 
amount of oil on his spring. Too little oil 
and guess what happens! 

Hidden around the numerous rooms 
in the Goblin's lair are five switches. Thing 
needs to collect these before he can get 
around all of the complex. Finding the 
switches and finding out what they do 
turns what could have been a normal 
platform game into a real arcade 
adventure. It took me an hour to gel out 
of the first room. 

Thing on a Spring has some superb 
graphics and sound. Gremlin's claim that 
Thing is 'cute and everso lovable' isn't that 
far from the truth. 

Rush out and buy it, you'll love it! 

S.C. 



E 





WHIRLINURD HAS A PASSION FOR 
collecting things. TV sets, grapes, toy 
yachts or candelabra have such a strong 
pull on his acquisitive nature that he will 
risk life and limb to reach them. 

Our hero lives in a dangerous world of 
mazes which are guarded by snakes and 
small round creatures with antennae. 
Whirlinurd must collect as many objects 
as possible avoiding contact with these 
creatures and can fly by using a rotor 
blade fitted to his head. 

The first few mazes are fairly straight 
forward but the complexity increases as 
you move from screen to screen. 
Eventually, you reach mazes in which you 
must find keys which fit in locks of the 
same colour. Placing a key in a lock opens 
up another part of the maze which 
contains one of the sought after objects 
but also releases another creature to add 
to your problems. 

I found this game quite challenging to 
play but I can't say that it was more 
exciting than the host of other games in 
the same vein. Like most of these games, 
once you work out a pattern to follow 
each maze can be traversed without a 
great deal of difficulty. One good feature 
is the ability to start at a higher level, 
preventing the need to start from the 
beginning every lime. 

J.C. 




SOMETIMES PROGRAMMERS CAN GO 
overboard with special effects at the 
expense of what could otherwise be a 
superb game. A View to a Kill is one such 
example. 

Based closely on the plot of the film, 
the game is split into three parts, or four if 
you count the title sequence which 
merely computerises the familiar opening 
sequence to all the Bond movies. 

The first scene picks up the story 
where Bond is chasing the hang-gliding 
villainess May Day. He has requisitioned a 
taxi for this purpose and he must avoid 
collisions with the buildings and the mad 
motorists of Paris if he is to intercept May 
when she touches down. To help, you are 
faced with a rather complex screen which 
shows a 3D view from the front window of 
the car, a bird's eye view of Paris and a 
gauge which tells you how far away May 
is. 

Although this is an excellent piece of 
programming, I would prefer a larger 
view of Paris so that I could see instantly 
where the hang glider is. Control of the 
car whilst looking at all the other displays 
is virtually impossible and you can't tell if 
the street you are on is a cul-de-sac or if 
you will end up driving yourself in Seine. 

The next two parts are action 
adventure games. The first is set in the San 
Francisco City Hall and you must rescue 
the beautiful Stacey from the lift shaft 
where arch-villain Max Zorin has trapped 
you both after setting fire to the building. 
As the fire creeps from room to room you 




must try to obtain the necessary 
equipment not only to rescue Stacey but 
able to use to escape from the building. 
Using a 'duck shoot' menu you can 
examine or use the objects which you 
find, command Stacey to follow or wait 
behind and if you go desperately wrong 
you can quit and start again. 

The final part is set in the mine in 
which Zorin has placed the device which 
will soon explode to make sure that the 
occupants of Silicon Valley have had their 
chips. Before you can defuse the bomb 
you must search the mine for suitable gear 
so that May Day can help winch you down 
to do your work. This section is very 
similar to the previous one, though in my 
opinion it is the better of the two. 

Each section of the game relies on 
success at the previous section to enhance 
your chance of being able to complete it. 
For example, a geiger counter is hidden in 
the City Hall which will help to locate the 
bomb in the mine. This gives a theme by 
which the three parts hang together as a 
whole but it also detracts from the full 
enjoyment of the individual parts. 

My advice is to spend your money on 
Bond but make sure that it is a Premium 
Bond, you have more chance of success 
and it may prove more rewarding. 

J.C. 




ALLITERATIONS ARTFUL AID ASSISTS 
another attempt at aggregating akkers for 
US Gold. Unfortunately, I don't think that 
it will, not because it is a bad game but 

E because it offers nothing more than the 
majority of ladders and platform games 
currently available. 
After a rather crude (by US Gold 
standards) loading sequence the title 
screen gives way to a view outside the 
brewery where we find our pot-bellied 



hero standing outside three doors. The 
doors are marked Control, Production 
and Shipping but as the game is similar no 
matter which door you enter we shan't 
linger on the significance of these labels. 

On entering one of the rooms you are 
faced with a scene of part of the brewing 
factory. There are doors on most of the 
levels and one or two of the floors have 
exit signs. Somewhere on the screen is a 
key which unlocks the way to another 
room and it is Bert's aim to grab the key 
and move on. 

Ventilation ducts blast air upwards and 
if Bert stands on one of these he is carried 
by the draft up on to the next floor. To 
escape from some of the rooms the air 
blast provides the only pathway to the 

Occasionally one of the doors opens 



and a mean little character appears. He 
walks up and down like a security guard 
and will fire the odd pot shot at Bert who 
must dodge or die. Bert is also armed and 
he can retaliate with a well-aimed shot 
which will kill his opponent who then 
disappears only to re-appear from behind 
another door. 

Some of the rooms are linked and the 
only possible means of escape is to enter 
the other room and face its perils only to 
reappear on the desired level of the 
original room to make his escape. 

For my money, this is not as good as 
the Bounty Bob games which US Gold 
markets but as you go from room to room 
the challenges increase in number and 
variety and I found that it at least held my 
interest. 

J.C. 




Adventures 



This month Runecaster delves 
into the secrets of Exodus: 
Ultima III and encounters 
elves, dwarves bobbits and 
fuzzies! 



Oh boy... oh boy! 



ARE YOU A FRUSTRATED BARBARIAN 
with your sword rusting on the wall? 
Perhaps, a mace bearing cleric resting 
between quests. Did you want to play 
Dungeons and Dragons. . .but couldn't 
find anybody else to join you at the right 
time or place - and, for the hours (days!) 
necessary for a worthwhile quest? 

Get down that sword, oil the hiking 
boots, get in a goodly store of victuals and 
prepare for an extended period away 
from the daily rat-race. 

If you haven't got a C64 complete with 
disk drive, now is the time to invest. . .and, 
while you're at it, get a copy of Exodus: 
Ultima III by Origin Systems Inc., 
distributed in the UK by US Gold. This is 
such an interesting find that for the first 
time I shall be looking at only this one 
subject. I hope you like role playing 
games! 
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enjoying themselves. You could watch 
this for longer. . .but what about your own 
team? 

Pressing SPACE gives you three 
options: Return to the moving vignette; 
organize a party; journey onward. You 
cannot choose the third without first 
creating your characters and forming a 
party so, your initial choice is determined 
for you. 

Again a menu, giving the option to 
examine the main characteristics of 
existing characters, creating new 
characters, forming or dispersing a party, 
removing (terminating) characters and 
finally returning to the previous menu. 

Vital Statistics 

Initially you must create a selection of 
characters - at least four. You can go 
adventuring with less than four but this is 
not recommended, especially to begin 
with! 

You may have up to 20 characters 'in 
store' and in creating each one, you must 
define their roster number (1-20), name, 
sex, race (human, elf, dwarf, bobbit or 
fuzzy). Each racial type has different 
potential abilities - dwarves are strong, 
elves are dexterous etc. You must bear 
this in mind - you wouldn't want a clumsy 
thief would you! 

Next, you have to choose the 
character type - barbarian, thief, wizard, 
ranger etc. There are 11 possibilities given 
and this choice must be made carefully. 

Not only do you want a balanced Party 
that can deal with whatever it meets along 
the way but you must also allocate points 
(up to a total of 50) to your character's 
strength, dexterity, intelligence and 
wisdom. This, together w,ith race and 
type, will modify a character's capabilities. 

The permutations possible are quite 
enormous but after a few forays into the 
unknown you will start to get some idea of 
a viable Party's requirements. You will 
probably 'zero in' on a toughie of some 
sort - preferably one that can also use a 
little magic. 

Then you'll need someone who can 
use prayers (cleric, druid etc), if only 
because they can heal injured friends and 
also magically examine treasure chests for 
traps. Thieves seem to be very useful - 
personally I like the female, elven variety! 
Then perhaps the pure wizard type or 
even your original red blooded barbarian. 

Study the table that gives the 
characteristics for each profession, this 
will tell you what weapons, armour and 
spell type each may use and what 
compromise is made (if any) for the use of 
. magic. 

Make notes of each character's 
attributes as you type them in. This is quite 
I important, because once created but 
before setting forth, you cannot check 
such attribute points as strength, 
dexterity, intelligence and wisdom. 



You may always call up a character's 
status during play but once the adventure 
proper has started you cannot return to 
the creation stage. When you have 
created sufficient characters then 'Form a 
Party', entering the four characters you 
have chosen, then return to the main 
menu and Journey Onward. 

Cheat! 

If you want to 'cheat a little' press 'Q', 
which allows you to save your position, 
remove the scenario disk and switch 
everything off! Now, reload the program 
operating system but this time put in the 
second scenario disk you created. 

Go through the character creation 
and party formation routines, giving 
exactly the same information as you did 
the first time. The scenario disk records 
all your characters' changing data as the 
game progresses. . .including their death. 

As this is quite likely to happen fairly 
often to start with one of your cheat 
disks should be kept as 'clean' as 
possible. Use this one when you start 
each time and 'save your position' to 
the 'clean' one as your characters 
gradually improve their standing. 

It is almost impossible to get away 
without somewhat corrupting these disks 
as you continue but at least it will 
eliminate a fair amount of time being 
spent creating characters when you 
would rather be learning how to pfay! 

At Large in Sosaria 

You are there at last, with the wind in your 
hair, standing with open rolling plains 
behind you and a small walled city in front 
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by typing 'Z' (ztatusl), this will tell you 
how much gold they have, what weapons 
or artefacts they are carrying and their 
present strength, dexterity etc. 

Naked into the World... 

Each character starts with a dagger and 
cloth armour (!) but you must tell them to 
'R'eady the dagger for use and 'Wear the 
cloth armour. . .otherwise they will enter 
battle using their bare hands and in their 
skins! 

They are also provided with 200 pieces 
of gold. The sensible thing to do next is 
'E'nter the town and visit either the 
weapons shop or the armoury. Weapons 
may be bought and sold at the listed price 
(no haggling!) as also may be food when 
you need it, from the grocers. 

Just a Quick One... 

There is also a pub where useful (?) gossip 
may be heard (bought!). In some towns 
you may also find other useful places, but 
you always need to search for these very 
carefully. You can even talk to the various 
people you meet in the streets. 

You are now kitted out to the limit of 
your purses and leave the safety of the 
town. You have of course read the 
instructions that came with this gateway 
to another world but you won't have 
absorbed all they had to say, and will 
perhaps have noticed just some of the 
omissions - like, there is a list of 32 
spells. . .but only one is explained! 

The spells have intriguing names such 
as REPOND, MITTAR, PONTORI, 
SANCTU, LORUM etc. Use of these 
depends upon the number of magic 
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of you. The display shows a plan view, 
with one character indicating the position 
of your party, water is shown to the right 
of the map and two buildings represent a 
castle and the small town. You can see 
some woods to the west. 

To the right of the map is a 'vital signs' 
display of your four characters. This gives 
you at a glance, such information as their 
food remaining, hit points (0=death), 
magic points (spell casting ability) and 
their Level (all start at Level 1). 

Further status information can be had 
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points a character has, these in turn 
depend upon character type and how you 
allocated those original 50 points. Only by 
playing, can you begin to understand how 
to achieve a workable balance. 

Spell That Again 

Try the spells at various times - whilst 
walking along, in battle, tost underground 
etc. See if you can work out what they do 
(I don't know, I've only been playing for 
about 30 hours so far!) MITTAR and 








Barry Miles has been looking 



at Handle's box of tricks and 



he found one or two 



surprises. 




THIS PRODUCT IS A VERY INTERESTING 
combination for the C64 user. It is both a 
motherboard to enable up to three 
cartridges to be installed simultaneously 
and also an IEEE interface. 

If you own an earlier Commodore 
machine you may already own a disk 
drive. The early models used the IEEE 488 
parallel bus normally known as the "I- 
triple-E" bus. This was a slight variation on 
the original design by Hewlett Packard. 

When the Vic 20arrived. Commodore, 
to many peoples amazement, changed to 
a Serial system. This resulted in data being 
passed along the line with the bits 
following one another rather than eight 
bits going in parallel. Obviously, this 
slowed down the data transfer rate and 
The 1541 disk drive used on the Vic 20 and 
the 64 has been slated for its slow 
performance ever since. This same 
process has been adopted on the C16and 
the Plus/4. 

The faithful Commodore user must 
buy some form of interface to make the 
4040, 8050, 8250, 1001, and 2031 drives 
work with the 64. Oxford Computer 
Systems Interpod - happily still available - 
solves this problem but enables these 
disks to communicate with the 64 at only 
the same speed at the 1541. 

What the average user wants is to be 
able to take advantage of the maximum 
speed of which the disk drive is capable. 

Generally speaking the interfaces 
which are available rely on placing some 
machine code in the memory of the 64. 
This sometimes conflicts with memory 
demands made by advanced packages. 

There are difficulties when it comes to 
connecting a number of cartridges to the 
64 and switching between them. Many 
and more ingenious manufacturers are 
putting protection into their cartridges 
which creates problems. 

Handle's approach was to supply an 
IEEE Interface board enabling the user to 
choose between three cartridges plugged 
in at once, whilst at the same time being 
able to use Commodore disk drives at full 
speed. In addition, the product has a 
Reset button. 

This was an interesting aspect of the 
design because it combined three 
desirable features. It is frustrating to plug 
in another board in order to use your 
cartridges only to find that you cannot use 
your disk drives. 

The Superbox is a Swedish product 
and seems very durable. The rigid metal 
case looks as if you could drive a car over it 
without damage. 




The only protrusions are the edge 
connectors. One for your IEEE cable and 
the other for plugging into the cartridge 
slot on the machine. There are rubber feel 
on the bottom to make sure that the box 
will lie flat. No RAM in the 64 is used and 
this avoids any memory conflict. 

In order to pick up the necessary 
signals it is necessary for you to connect a 
crocodile clip to a single resistor on the 
C64 board. This is not a difficult task to do 
but nervous and ham-fisted users may 
prefer to get their dealer to do this for 
them. Fortunately you can remove the 
box, should you need to do so, whilst 
retaining the connection. 

The switching has been very pleasantly 
designed indeed. At the far end of the 
box, is a set of five switches. As you switch 
on one cartridge slot the other switches 
pop up; the only way you can accidentally 
have two cartridges in the circuit at once is 
by pushing two buttons simultaneously. 

The IEEE button will connect you to 
your parallel IEEE device. The Reset 
button is a great advantage because (he 64 
unlike its successors, the C16 and the 
Plus/4, had no reset button whatsoever. 
By pressing this red reset switch a "Cold 
start" is performed which leaves the 
contents in RAM unaffected, if the system 
has "hung" use of this button may get you 
out of trouble without losing any data. 

In Use 

Testing the box with a variety of cartridges 
showed that most of them would work 
perfectly OK. Certain types of cartridge 
however would not function correctly. 

There is a somewhat startling warning 
in the brief A4 sheet manual saying that if 
an IEEE unit is connected to the board and 
not switched on when the machine is 



running, the Superbox 64 may be 
damaged. Inquiries of Handic UK, 
confirmed that this was merely an 
example of Swedish caution and not to be 
taken too seriously. 

You are warned not to connect more 
than two IEEE units at the same time and to 
make sure that all units connected are 
switched on before running the system. I 
was not tempted to test this out with a 
variety of extra IEEE units! 

Conclusion 

At £69, the superbox 64 is not a cheap 
product in fact if you compare it directly 
with another mother board you will find it 
extremely highly priced. However you are 
really getting two products for the price of 
one! Highly recommended. 

The only difficulty likely to be 
experienced in using the Superbox arises 
because of its all-or-nothing approach to 
life. You are expected to be using either 
all Serial or all Parallel IEEE devices. An 
addendum to the manual gives a partial fix 
for this. 

By PEEKing five memory locations and 
recording their content manually, you 
enable the use of the Reset button 
without the loss of a Basic program. Thus, 
you press the button lo switch between 
IEEE Serial and Parallel in either direction 
and then press the Reset button. Finally, 
you POKE the data which you have 
recorded into the same memory location. 
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Jolly old Rupert can walk, 
jump, leap, climb stairs- 
and even fly - but can you 
get him to the party? 

32 challenging screens 
of animation and fun. 




The most powerful games in the Universe 



Quicksilva Ltd, Liberty House, 

222 Regent Street, London WIR 7DB. 

Telephone 01-439 0666 

Rupert Bear © Express Newspapers PLC 






THE FINAL CARTRIDGE 



• A new outside OPERATING 
SYSTEM built in a cartridge, that 
does not use any memory and is 
always there. compatible with 
9^.9% of the 20.000 C64 
programs 

• 24K EXTRA RAM for basic 
programs. 

• A DISK TURBO that not only 
LOADS 6 TIMES FASTER but 
also SAVES 6 TIMES FASTER!! 

• A PRINTER INTERFACE that is 
compatible with all the well 
known Centronics printers and 
Commodore printer programs. 
Prints out all the Commodore 
graphic characters and control 
codes. 

• A SCREEN DUMP for normal 
and hi res sreens (c.q. 
Doodle). With a special burlt in 
routine that searches for the 
memory adress of the hi-res 
picture automatically. 



FOR CBM64 




• PREPROGRAMMED FUNCTION 
KEYS. 

Run. list. load. save, catalog etc. 

• MACHINE LANGUAGE 
MONITOR. Very sophisticated 
assembler/disassemWer/moni- 
tor 

• BASIC 4.0 and DOS 

COMMANDS. Dload. DSave. 
Catalog: reads directory without 
disturbing your programs. 
BASIC TOOLKIT, auto. 



renumber (incl. goto) help etc. 
RESET SWITCH. Resets to 
monitor. Resets with old (leaves 
your basic program intact) 
Resets every protected program 

• CASSETTE TURBO that loads 
and saves programs 1 0 TIMES 
FASTER including files and 
records. 

( 11MI Mill M' 1 

Wolphaertsbocht 236 

3083 MV Rotterdam. 

Netherlands 

Tel.: 01031-10231982 

Telex: 26401 a intx nl 




Programming 



PART 1 OF THIS SERIES DEALT ONLY 
with decimal and hexadecimal codes 
because they are the mosl popular for 
general purpose use. However, there is 
another method of representing binary 
known as Binary Coded Decimal, (BCD 
for short). The 6502 microprocessor is 
particularly well equipped for handling 
this type of code. The common arithmetic 
processes of addition and subtraction are, 
by default, carried out in normal two's 
complement binary. It is possible to 
change this by using the instruction SED 
which is the mnemonic for SEt Decimal 
mode. Once the machine has executed 
SED. (op-code F8 hex) all subsequent 
arithmetic is carried out in BCD until 
cancelled by CLD (op-code D8) which is 
the mnemonic for CLear Decimal mode. 

The BCD code 

Before considering the areas where BCD 
might be useful, we must understand the 
mechanism of the underlying code. 
Perhaps the easiest way to start is by 
examining the following byte, artificially 



fi 




split into two separate nibbles for ease of 
understanding: 

1001 0010 



If this was interpreted in terms of absolute 
(unsigned) binary, it would represent 146 
in decimal, 2+16+128. If interpreted in 
signed binary (two's complement) it 
would represent -110in decimal. Finally, if 
interpreted in BCD, it would represent 
the decimal number 92. In fact, the space Redundancies 
we left between the two nibbles, although 
artificial, turns out to be a direct aid to the 
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understanding of the mechanism behind 
BCD. Each nibble should be thought of as 
a separate black box, the right-hand box 
represents the units column and the left- 
hand box represents the tens column. 
Here are some BCD examples: 
1000 0111 = 87. 

0110 0001 =61. 

0111 0111 = 77. 
0101 0000 = 50. 
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10 


033C 




! CONVERT ASCII TO BCD DIBIT 


20 


COOO 




*-*COOO 


30 


COOO 




MEM - *FB 


40 


COOO 


38 


SEC 


50 


COOl 


A5FB 


LDA MEM 


60 


C003 


E930 


SBC #$30 


70 


C005 


B5FB 


STA MEM 


80 


C007 


60 


RTS 
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111 Converting ASCII to BCD digit. 


















10 


033C 




! CONVERT BCD DIGIT TO ASCII 


20 


COOO 




»-*COOO 


30 


COOO 




MEM - *FB 


40 


COOO 


18 


CLC 


50 


COOl 


A5FB 


LDA MEM 


60 


C003 


6930 


ADC #*30 


70 


C005 


B5FB 


STA MEM 


80 


C007 


60 


RTS 



Apart from the difference in 
interpretation, the BCD code has, what 
the code boffins are pleased to call, 
redundancies. We can see what this 
means when we consider the number of 
possible ways in which 8 binary bits can be 
arranged. For simplicity, let's start with two 
bits. These can only be arranged in four 
ways. 00,01.10 and 11. Three bits can be 
arranged in 8 ways, 000,001,010,011,100, 
101 ,110 and 111. So for two bits, there are 
four ways (2 2 ) and for three bits there are 
eight ways (2*) so we can deduce from this 
that the general formula for knowing the 
number of ways of arranging N bits is 2N. 
Now, in the case of an eight bit byte, we 
shall expect that there are 2" = 128 ways of 
arranging the bits. Normal binary and 
hexadecimal codes use all these combina- 
tions but BCD doesn't. In fact, as the 
following table shows, there are six 
combinations (redundancies) in 
nibble: 



BCD Decimal 



0000 
0001 
0010 
0011 
0100 
0101 
0110 
0111 
10(H) 
1001 



o 
1 

2 
3 
4 
5 
6 
7 
8 
9 



1010 
1011 

1100 illegal 

1101 combinations 
1110 

1111 



E 




As you can see, the illegal combinations 
are those greater than 1001. These are the 
combinations normally represented by 
the letters A to F in hexadecimal. 

We conclude therefore that 
representing numbers in BCD is 
inefficient because, out of 16 possible 
combinations, only 10 are used. In 
percentage terms, this represents an 
efficiency of only (10/16) x 100 = 62.5%. As 
far as memory usage is concerned, we 
need about 30% extra memory space to 
store numbers of BCD form because a full 
nibble is still required for each BCD digit 
in spiteof the combinations which remain 
unused. We can represent efficiency in a 
more obvious way by comparing BCD 
with unsigned binary in respect of the 
largest number capability. The largest 
legal combination in BCD is 1001 1001, 99 
in decimal, whereas in unsigned binary 
the largest is 255 decimal. 

BCD addition 

Since we mustn't use combinations 
greater than 1001. what exactly happens 
when we add 1 to 9 in BCD? Under normal 
binary conditions, the addition would be 
quite straightforward: 

0000 1001 
add 0000 0001 



0000 1010 



But, the right hand nibble now has an 
illegal combination! However, if the 6502 
had been previously instructed (by means 
of SEDJ to perform the addition in BCD, it 
would perform as follows: 

0000 1001 
add 0000 0001 




Program 113 Convert hex digit to ASCII. 



10 


033C 




1 rnMUPRT 


ucy mnSTT Tfl AcriT 


20 


cooo 




#-*COOO 




30 


cooo 




MEM 


- *FB 


40 


cooo 


18 




CLC 


50 


COOl 


A5FB 




LDA MEM 


60 


C003 


C90A 




CMP #10 


70 


C005 


9002 




BCC OVER 


80 


C007 


6906 




ADC #6 


90 


C009 


6930 


OVER 


ADC #*30 


100 


COOB 


85FB 




STA MEM 


110 


COOD 


60 




RTS 




Program 12.4. Convert ASCII to hex digit 



10 


033C 




! CONVERT 


ASCII 


TO HEX DIGIT 


20 


COOO 




*=*COOO 






30 


COOO 




MEM 




*FB 


40 


COOO 


38 




SEC 




50 


COOl 


A5FB 




LDA 


MEM 


60 


C003 


E930 




SBC 


#*30 


70 


C005 


C90A 




CMP 


#10 


80 


C007 


9002 




BCC 


SKIP 


90 


C009 


E907 




SBC 


#7 


100 


COOB 


85FB 


SKIP 


STA 


MEM 


110 


COOD 


60 




RTS 





0001 0000 

Note that adding the 1 has resulted in a 
premature carry from the right-hand 
nibble into the left-hand nibble. It is 
called the 'half carry' to distinguish it from 
the normal carry out from [he msb end. 
Note carefully that the total (10 in 
decimal) is correct in BCD format. How 
does the microprocessor perform this bit 
of trickery? Actually, the answer is simple. 
It performs the addition in normal binary 
and then tests the result. If the right-hand 
nibble is illegal it then adds a further six. 
This may seem mysterious but is quite 
logical when you think about it because 
there are six illegal combinations which 
must be skipped. Examine the following 
example, using the previous figures: 
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add 



0000 1001 
0000 0001 



0000 1010 
add 6 0000 0110 



illegal, so 



0001 0000 result correct in BCD 



You should try out this trick with various 
combinations to convince yourself that it 
works every time. 

What use is BCD? 

Since BCD has been demonstrated to be 
inefficient, the obvious question is what 
do we get in return? One answer, not the 
most important, is simplicity. Only a 
cursory glance at the contents of a BCD 
byte is sufficient for most of us to convert 
into the equivalent decimal. However, a 
more substantial reason for including 
BCD in a computer is to make it 
compatible with external equipment, 
particularly the vast army of digitally 
controlled instruments. Most instruments 
of this form are equipped to either accept 
BCD formatted inputs or deliver BCD 
outputs. For example, a digital voltmeter 
can transmit readings from an external 
system to the computer in BCD 
'language'. Conversely, a variable. voltage 
power supply can be controlled by 



sending BCD information from the 
computer. 

It is realised, of course, that the 
majority of readers may not have access to 
such equipment in which case these 
facilities may be of little interest. But, we 
should remember that any computer has 
vast potential. It is possible that addiction 
to games, entertaining though they may 
be for a time, may not last for ever and 
many users may feel the urge to exploit 
their machines in other directions. We 
should bear in mind that the inputoutput 
bus in Commodore machines, ever since 
the days of the original PET 2001, have 
been based on an industry accepted 
standard known as the IEEE bus protocol. 
True, the Commodore employs a slightly 
modified version of the bus but, in 
general, it is reasonably compatible. We 
have no space in this article to discuss the 
details of the bus although we should 
point out that BCD is the accepted code 
used for passing numerical data between 
computer and external equipment. 

BCD is also useful as a convenient 
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Program 12.5. Add two BCD Numbers and display result 



10 


033C 


! ADD TWO BCD 


NUMBERS AND DISPLAY 


20 


033C 


! THE RESULT 


IN DEC DIGITS 


30 


033C 


NUMBER 1 


- *FB 


40 


033C 


NUMBER2 


- *FC 


50 
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intermediate code useful as a stepping 
stone for other conversions. 

Code conversions 

The above discussion on BCD raises the 
general question of conversion between 
codes. It is often required to convert 
information from one code to another, 
either for reasons of efficiency or 
convenience. The conversion can be 
achieved by short program segments, 
preferably written in machine code. For 
the most part, they are short so instead of 
the usual practice of presenting an 
additional hex dump, we shall present 
them in full assembly form which includes 
the equivalent op-codes in hex. 

Convert BCD digit to ASCII 
(See Program 12.1) 

Program 12.1 Convert BCD digit to ASCII 



For the benefit of those who do not have 
an assembler, the columns, reading from 
left to right, have the following 
significance: 

Column 1 is a line number, used for 
reference pruposes only. (You can't jump 
to a line number like we do in BA5IC). 
Column 2 is the hex address of the 
location which stores the first byte of the 
current instruction. 

Column 3 is the instruction in terms of 
machine code hex digits. 
Depending on the instruction, there may 
be one, two or three pairs of hex digits. 
The first pair will always be the op-code 
and the remaining pairs, if any, will be a 
single or double byte operand. 
Column 4 is the label field. That is to say, it 
will contain arbitrarily chosen labels for 
branch destinations. If no labels are used, 
the column is left blank. 
Column 5 is the instruction in assembly 
language, consisting of the mnemonic 



code and operand. 

Those without an assembler will have to 
place Column 3 machine code bytes in 
the data statements of the hex loading 
program given in part 3 of this series 
(December issue). Taking program 12.1 as 
an example, the data statements would be 
entered as follows: 

DATA 18,A5,FB,69,30,85,FB,60 

Description of program 12.1 



Line 10 starts with ! so it is simply a remark. 
Line 20 tells the assembler to locate the 
program starting at the address $C000. (In 
our assembler, $ means hex, not string). 
Line 30 tells the assembler that the address 
$FB is to be known by the symbolic name 
MEM. It is assumed that the current 
contents of MEM is holding the BCD digit 
to be converted. 

Line 40 clears the carry ready for the later 
addition. 

Line 50 loads the accumulator with the 
BCD digit. 

Line 60 uses immediate addressing to add 
hex 30 (decimal 48) to the BCD digit. 
Suppose MEM originally held 3. When 48 
is added, it would hold 51 which is the 
ASCII code for 3. 

Line 70 stores the converted number back 
in the original location. The program can 
be used asa subroutine called from within 
a BASIC program by using SYS 49152. 

This simple program has been treated 
in extra detail because the full assembly 
format may be new to some readers. It is 
hoped that the programs which follow 
can be understood without resorting to a 
similar line by line analysis. 

Converting ASCII to BCD digit 
(See Program 12.2) 

Program 12.2 Converting ASCII to BCD 
digit 



This is virtually the mirror image of the 
previous program, the only difference is 
that $30 is subtracted instead of being 
added. However, we should note that the 
carry has to be set, using SEC, before a 
new subtraction instead of being cleared 
by CLC. 

Convert hex digit to ASCII (See 
Program (12.3) 

Program 12.3 Convert hex digit to ASCII 



Line 60 compares the value of the hex 
digit with 10decimal. If the carry is clearin 
line 70, it signifies that it was less than 10so 
a branch is made to line 90 which adds hex 
30 to lift it into the ASCII band. 

If however, the previous comparison 
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showed that the hex digit was 10 or 
greater, an extra six is added to allow for 
the gap of seven between the ASCII code 
for 9 and the ASCII code for A. Note that 
the carry is always set before the ADC 6 
instruction so, in effect, we are adding 7. 

Coverting ASCII to hex digit 
(See Program 12.4) 

Program 12.4 Converl ASCII to the hex 
digit. 

This program is almost a mirror image of 
the previous one, except of course thai 
subtraction of hex 30 is involved instead of 
addition which is why line 40 sets the 
carry. Notice that, this time, the full 7 is 
subtracted (the gap between ASCII '9' and 
ASCII 'A') since the SBC instruction is 
entered with the carry set. 

Addition of BCD numbers (See 
Program 12.5) 

Program 12.5 Add two BCD numbers and 
display result 

The program is intended only as a guide to 
the general procedure of adding in BCD. 
Because of this, the simple constants 8and 
9 have been used for the two numbers. 
The result, 17, is arranged to be printed 
out on the screen using the ROM 
subroutine CHROUT. (We must 
remember that CHROUT will only print 
the character corresponding to the ASCII 
code in the accumulator.) Practical 
versions will, of course, be more likely to 
supply the numbers as variables. 

How the program works 

Lines 30 to 60 assign the symbolic 
addresses NUMBER1, NUMBER2 and 
RESULT together with the ROM character 
output subroutine at address FFD2 hex. 
Line 80, by use of the instruction SED, 
makes use of the 6502's ability to perform 
all following arithmetic in BCD. 
Lines 90 and 120 store the arbitrary con- 
stants for later use. 

Lines 130 to 160 performs the addition of 
BCD, the add-6 operation is carried out 
automatically by SED. 
Lines 170 and 180 store the result and 
then call on OUTPUT. The machine is 
then reset for normal binary arithmetic by 
use of CLD. The subroutine OUTPUT is 
used to prepare the accumulator for 
action by CHROUT. 

A copy of the raw data is first placed on 
the stack by use of PHA. The accumulator 
at this point will contain: 

0001 0111 (17 BCD) 

The accumulator is then shifted right 4 




Program 12.6. Displaying contents of location in hex. 
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places in order to position the higher 
order digit at the right: 

0000 0001 

The addition of 30 hex is then added to lift 
the number into the ASCII band, the 
accumulator will now contain: 

0011 0001 (31 hex, 49 decimal) 

This is the ASCII for the digit T so when 
the subroutincCHROUT iscalled, this will 
appear as the first digit result on the 
screen. The original raw data is pulled 
back from the stack using PLA so the 
accumulator now holds, as before: 

0001 0111 (17 BCD) 
We now AND with: 

00001111 (OF hex) 
which produces: 
0000 0111 

As you can see, the accumulator now 
holds only the least significant digit (7) of 



the original BCD result. The usual 30 hex is 
then added to convert to ASCII so the 
accumulator now holds 37 hex (55 
decimal) which is the ASCII code for 7. 
The accumulator is then sent to the screen 
via another call to CHROUT for displaying 
the second digit of the result. 



Displaying contents of location 
in hex (See Program 12.6) 

Program 12.6 Displaying contents of 
location in hex. 

This program does not justify detailed 
explanation since it is broadly similar to 
the previous one. This time, SED is not 
used, we expect that somewhere along 
the line, we have to add six, (see line 170). 

Summary 

This article has attempted to show some of 
the various techniques which can be used 
for code conversion. Consequently, the 
programs should be interpreted only as 
guide lines to be introduced in practical 
subroutines. 
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IF YOU WRITE MACHINE CODE JUST TO 
improve your Basic programs, there 
comes a lime when you M/C routines 
cannot stand alone and need values 
passed to them from Basic. The simplest 
way to achieve this is by POKEing the rele- 
vant values into memory and picking 
them out using your routine, if you do this 
the best locations to use are those used to 
store the 6502's registers which are acces- 
sed during a SYS call, they are as: 

780 Accumulator 

781 X register 

782 Y register 

783 Status register 

Perhaps the best known example of this 
method is a basic program to PRINT AT 
using the KERNAL routine PLOT: 

10 POKE 781, ROW 

20 POKE 782.COLUMN 

30 POKE 783,0 

40 SYS 65520: REM call PLOT routine 
50 PRINT "Pretty cumbersome though 
isn't it?" 

Unfortunately, this method only allows 
you to use integers from 0-255. 

If you need to use a bigger number a 
better method is to use the Basic USR 
function I've never seen this used in a 
program which is probably due to the lack 
of documentation about it in the manuals. 
The USR function enables the passing of 
one floating point number in the rangeO- 
65535 to your m/c program. The function 
takes the value converts it to floating 
point and places it in ihe floating point 
accumulator 1 and then activates the M/C 
routine pointed to by the low/high bytes 




at 785/786. All your M/C routine needs is 
to use the routine CONV at $ B7F7 which 
converts a floating point number in 
FPACC11 to an integer in $14 and $15. 

10 REM set USRADD to SCAAA 
20 POKE 785,170 
30 POKE 786,202 

40 P=USR(65535):REM evaluates 65535 
to FPACCl then executes routine at 
SCAAA 



M/C routines: 
CAAA JSR 
LDA 



TAX 

LDA 
TAY 



$B7F7 
$14 



$15 



'convert FPA- 
CCl to integer 
in $14 and $15 
'save low byte in 
X-reg 

CAB2 TAY 'save high byte 

in Y-reg 

The third method is slightly more 
complicated but is definitely the best, 
that is, extending the 5YS call to pass 
values as well e.g. SYS addr, value 1, value 
2, etc. This can only be done at machine 
level and needs the use of a number of 
ROM routines. 

The first of these is CHARGET. 
Although this resides in ROM, a copy of it 
can be found located in ZERO-PAGE at 
location $0073. It is used by Basic to 
collect bytes of the current instruction 
(and i% therefore in zero-page for speed), 
in fact we only need a part of it called 
CHARGOT at $0079. This collects the 
current byte without first updating the 
pointer, otherwise the point at $007B 
would be updated and we would miss the 
first parameter. The second routine is 
CEKCOM at $AEFD. This checks for a 
comma after the address, if it does not 
find one a 'SYNTAX ERROR' is generated. 
The third routine is EVAL at $AD8A this is a 
complex routine which evaluates an 
expression and converts it to floating 
point and then places it in FPACCL The 
last routine CINT at $B7F7 I have already 
described.. 

To illustrate how to use these routines 
I've written a small program which is a 
M/C version of listing 1 i.e. it sets the cur- 



sor position for PRINT but without all the 
POKEs, just one SYS call. 



JSR $0079 
JSR $AEFD 



JSR $AD8A 
)SR $B7F7 



LDA $14 
CMP «$28 
BCC NEXT 



ERROR JMP $B248 



NEXT 



PHA 

JSR $AEFD 
JSR $AD8A 
JSR $B7F7 



LDA $14 
CMF #$19 
BCS ERROR 

TAX 

PLA 

TAY 

CLC 



JSR $FFF0 
routine 

RTS 



'get byte 
'if not a comma 
generate error 
message 
'evaluate 
expression 
'convert FPA- 
CCl to integer 
in $14 and $15 
'lead low byte 
'>than 40? 
"no so get next 
parameter 
'yes so generate 
ILLEGAL 
QUANTITY 
error 

'save value on 
stack 



'repeat as above 
for second 
paramter 

' > than 25 
'yes so generate 
error message 
'no so transfer 
to X-register 
'retrieve last 
value 

'transfer to Y- 
register 

'clearcarryfifset 
PLOT will only 
read cursor 
position 
'execute PLOT 

'return to BASIC 



As you can see, the process is repeated for 
each paramter except that CHARGOT is 
only used once. Also, the advantage of 
using EVAL at $AD8A, is that expressions 
such as 5*COS(10) or variables can be 
used. Finally, to use the routine: 

SYS addr.column.row: PRINT" message" 
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Barry Miles plugs into the 
MW350 Printer Graphics 
Interface, which makes a 
larger selection of printers 
available to Commodore 
users. 

ADVANCED BUSINESS PROGRAMS FOR 
ihe CBM 64 use the entire memory of the 
machine. This entails conflict over the use 
of the same memory area. Micrographics' 
MW350 Printer Graphics Interface for the 
Commodore 64 and VIC 20 has its own 
power supply and. therefore, solves this 
problem! 

Initial impressions 

On the top surface of the attractive little 
box there is a reset button and six dip 
switches which enable you to configure 
your interface to match quite a long list of 
printers, including Epson, Nec and Oki. 
Other manufacturers' models are catered 
for where they have similar characteristics 
to one of those listed. The five-foot cable 
leading to the computer is sturdy, rubber 
covered and ends in a no-nonsense metal 
Din connector with a sp.-ing protecting it 
from being bent at too sharp an angle. The 
ribbon cable is long enough to connect to 
a fairly distant printer. 

The additional connection to the 
cassette port is optional, because some 
printers will supply a five volt electrical 
supply to pin 18 of the 36 pin connector. 



Connecting up 

You are advised to ensure that all the 
peripherals are powered up before the 
computer is switched on and sends a reset 
signal to initialise the disc and printer. If 
the printer scrolls one line upwards, the 
interface is working. If it does not, you 
may find that the printer is not on line, 
possibly because the paper-end detection 
device is working. 

Conveniently, the printer interface 
will produce a status report to show you 
what's what. The status report is quite 
informative. For example, it tells you 
which printer you have set your interface 
to work with, or whether your line feed is 
in operation. 

Documentation 

The documentation Is very thorough. 
However, it is printed in green and in 
rather small type! A very detailed 
introductory section runs to six chapters. 
Five chapters of reference material 
follow. 
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Hardware Review 



In operation 

As supplied the MW350 will function 
with virtually all printers. To get the best 
out of your system, you set up the three 
dip switches to match the printer type 
which you are using. I used an Epson FX80. 
The Universal setting will enable you to 
use a Daisywheel printer, although of 
course the graphics capability is then lost. 

Switch 5 controls the ASCII character 
conversion. Switch 6 selects the device 
number. If you change the switch settings 
after power-up you must press the Reset 
button. 

Commodore 1525 emulation 

When dipswitch number 5 is in the off 
position, you obtain an exact simulation 
of the 1525's performance. If you send the 
appropriate control codes you will be 
able to do double-width printing, or have 
columnar tabs up to 80 print positions 
available by sending CHR$(16) followed 
by 2 numbers which specify the start 
column. You can also set up your own 
user-definable character and can even do 
dot tabulation, taking your print head to 
any one of 480 dot positions. There is a 
Graphic Repeat function which repeats a 
single graphics character. 

In the Emulate mode, you are also able 
to use additional commands which are 
peculiar to the MW350. By opening a file 
to your printer with a secondary address 



of 1, you arrange that all the commands 
which normally result in a reverse field 
character appearing when a BASIC 
program is listed, are now translated into 
readable mnemonics. This makes your 
listings transparently obvious, even if you 
have not memorised the Commodore 
symbols. 

In this mode you are not able to print 
Commodore graphics as graphics. What is 
printed instead is the key which would be 
struck on the keyboard in order to 
produce that graphic symbol. This is 
particularly helpful for printing out 
programs which use vertical or horizontal 
oar graphics symbols, which are very 
difficult to distinguish from one another. 

You can also set the left and right hand 
printer margins to leave plenty of space 
for notes or to perforate the sheets for 
filing purposes. 

Sending control codes 

The Transparent mode of operation 
enables you to send codes to your printer 
which control various special features. 
You merely open the file to the printer 
with a secondary address of five. Once 
this is done all print commands are sent 
literally. Problems could arise if you 
wanted to send commands to the printer 
while you were already in Emulate mode. 
The Commodore 1525 itself reacts to 
certain escape sequences. However this 
has been catered for by arranging that the 



control sequence will be correctly 
transmitted to your printer if you precede 
it by an extra ESCAPE character. 

The MW350 has a number of extra 
features to make life easy. You will find it 
useful to keep the interface close at hand, 
because the switches and buttons are 
likely to be in continuous use. The push 
button initialises the interface. If you are 
using single sheet mode, the printer 
pauses at the bottom of each page. You 
simply press the button once to continue 
printing. There is a monitor which is used 
to check whether the interface is working 
satisfactorily. You can defeat the right 
margin of 80 columns if your printer has a 
wide platten and you need to use that. 

There is a 'skip-over perforations' 
feature, which is disabled on power-up. 
This is combined with a form length 
setting command which enables you to 
accommodate different sized sheets of 
paper. 

Conclusions 

This interface has a wide range of 
capabilities, is very easy to use and fills a 
substantial need. Whilst quite expensive, 
its versatility, in offering Commodore 
users a wider selection of printers, justifies 
the price. And, the Emulate mode 
prevents the frustration of not being able 
to use Commodore printer-orientated 
software. The MW350 is well designed, 
robust and is highly recommended. 
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Are your Hies in a 
mess? Get them 
sorted out with this 
program by Les Allan. 





WHEN SAVING FILES TO DISK, 
it is nice to retain an orderly 
sequence so as to keep a group 
of files together. However, 
when a file is scratched from 
the disk a 'gap' is left in the 
directory such that the next 
SAVE is made to that location. 
This means that if a number of 
associated files are being made 
the sequence is jumbled. 

Utilities exist on the market 
such as a disk dissector that 
enables a tidy routine to be 
applied to the directory but 
again the sequence can be lost 
as the routine used is an 
alphabetic sort and not a 
manual one. 



With (his utility the order 
can be decided upon by the 
user simply by swapping any 
two locations at a time until the 
desired sequence is obtained. 
OK! It may take several 
operations to get the directory 
sequence but it works and 
works well. 

The utility works by reading 
the directory contents into 
several arrays to store the 
name, track and sector, file 
type and file data which is then 
displayed on the screen for 
editing. Due to the limitation of 
the screen the maximum 
number of entries allowed is 
40. Simply select the two 
locations to be swapped, 
repeating the process for as 
long as necessary, and select • 
or N to write the new directory. 



Functional Listing 

14 - 16 clear screen and set up colours 
18 - 26 variables for screen title 
28 - 38 print screen and look for RETURN key pressed 
46 sets initial variables for track/sector/buffer 

pointer 
48 initialises drive 
50 opens a random file 
58 - 70 get name from track 18/sector 0 and print to 
screen 

78 - 82 dimensions arrays 

90 - 108 read each directory entry and check for an 
open file 

116 - 128 print each name to the screen 
142 - 1% manual sort routine 
204 - 260 write new directory to disk 
268 - 270 disk error channel test 

278 - 282 number of characters to be read from buffer 
290 - 292 read character fom buffer 
300 - 306 get OK to continue 




Program Listing 



E 



10 

12 

14 

16 

18 
$+ 



REM 



DIRECTORY ORDERLY 



P0KE53280 , 15: P0KE532B1 , 6 
PRINTCHR$C5)CHR$C 147) 
T1S-CHRSC117) :F0RX=1T020:T1$-T1 
CHRSC96) : NEXT: T1S-T1S+CHRSC 105) 



20 T2$=CHRSC 125) : FDRX=1TD20 : T2S-T2 
5+CHRSC32) : NEXT: T2S-T2$+CHR$C 125) 
22 T3$~CHR$C125)+" DIRECTORY ORDE 
RLY "+CHRSC125) 

24 T4S-CHRSC125)+" BY LES ALLA 
N "+CHR5C125) 

26 T5S-CHRSC 106) : FDRX-1TQ20 : T5S=T5 
S+CHRS C 96) : NEXT: T5$-T5$+CHRSC 107) 
28 PRINT : PRINTSPCC9)T1$ : PRINTSPCC9 
)T2$:PRINTSPCC9)T3$ 

30 PRINTSPCC9)T2S:PRINTSPCC9)T4$:P 
RINTSPCC9)T2$: PRINTSPCC9)T5S 



32 F0RX-1T011:PRINT:NEXT 

34 PRINTSPCC3) "LOAD DISK IN DRIUE 

PRESS RETURN" 
36 GETKEYS: IFKEYSOCHRSC 13)THEN36 
38 PR INTCHRSC 145 ) " 



SET UP IN 



40 : 

42 REF1 »»»»»»*«♦»*♦»*»* 
ITIAL PARAMETERS »****»**«•»«»»•»• 

44 : 

46 D-0:T-19:S=0:BP-144 

49 0PEN15,8,15, " 10" : 60SUB268 

50 0PEN2,8,2, "tt " : G0SUB268 
52 : 

54 REN **»*»»•**•***»»*»*»«»**» GE 
T DISK ID »***»•*»•»*»♦•»**•«*•*«• 

56 : 

SB PRINT#15 , "Ul: "2 ; D ; T ; S : G0SUB26B 
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Program Listing (cont.) 



BO PR I NT# 15 , "B-P : " ; 2 ; BP 

62 IDS-"":N-23:G05UB272: IDS-ZS 

B4 PRINTCHRSC 13) : F0RX"1T011 : PRINT: 

NEXT 

B6 PRINTSPCC11)"DISK NAF1E ID DOS" 
BB PRINT:PRINTSPCCB)IDS 

70 PRINT: PRINT: PRINT 

72 : 

74 REn *•»*••..»»•..*.... SET UP D 
I RECTORY ARRAYS »»»**••»«»•»•*»•*» 

76 : 

78 DinS^C 19) , FTSC 192) , TSSC 192) , NFS 

C192) .FESC192) , 5KSC192) ,T$C4) 

BO TS CD- "SECT : TSC2)="PRG" : T$C3)=" 

USR":TSC4)-"REL" 

82 F0RI-1T030: 20S-Z0S+CHRSC0) : NEXT 
B4 : 

B6 REH »*»»»»«»»««**»*»*« READ DIR 
ECTORY ENTRIES •**»•»•*«»»*»»«.»•• 

88 : 

90 5-1:1-1 

92 PR I NT#15 , "Ul: "2 j D ; T ; S : GDSUB26B : 
BP-1 

94 PR INTM15 , "B-P: " ; 2 ; BP : G0SUB290 : S 
*C9)-A: REM GET NEXT SECTO 

R 

96 PR INT#15 , "B-P: " ; 2 ; BP : G0SUB284: F 
T-A: REM GET FILE TYPE 

9B IFFT-00RFT-128THENBP-BP+31 : GOTO 
122 

100 IFFT<12BTHENPRINTSPCCB)CHR$C11 
)"FILE ERROR NOT CLOSED" : G0T0252 
102 FTSCE)=AS 

104 N-2:G05L!B278:TS$CE)-Z$: 

REM GET T&S 

106 N=16:G0SUB278:NFSCE)-Z$: 

REfl GET NAHE 

108 N=11:G0SUB27B:FE$CE)=2S: 

REn GET FILE 

110 : 

112 REn •*»»«»-«»•»•»•*»»»» PRINT 
DIRECTORY ENTRY ***»»*»»««»««*»»»» 

114 : 

116 PRINTSPCC8)NF$CE)" : "TSCFT-1 
2B) 

11B PRINTCHRSC145)CHR$C145) 
120 BP-BP+2: E-E+l 
122 IFBP<256G0T096 

124 IFS^CSX>255THENS-S'iCS) : G0T092 
126 FORX-1T01000:NEXT:GOSUB300 
12B E-E-l : IFE-0G0T0204 
130 : 

132 REn »*»***»•■**»»*«*»**• riANUA 
L SDRT ROUTINE ********»»***«*»*»* 



134 : 

13B IFE>40THENGOT0194 
13B PRINTCHRSC 147) 

140 F0RI-1TDINTCE/2+.5) :PRINTRIGHT 
$CSTR$CI),2)" "NFS CI): NEXT 
142 PRINTCHRSC1B) 

144 F0RI-INTCE/2+.5)+lT0E:PRINT, ,R 
IGHTSCSTR$CI),2)" "NFSC I ) ; NEXT 
14B PRINTCHRSC 19) : F0RX-1T021 : PRINT 
: NEXT 

148 PRINTSPCC3)"SU)AP OUER WHICH NU 
nBERS * TO END " 

150 PRINT5PCC11) "FROn .. TO . 

fp 

m 

152 GETKEYS: IFCKEY$< "0"ORKEY$> "9") 

ANDKEY$< > "* "THEN 152 

154 IFKEYS-"*"THEN204 

156 PRINTCHRSC 145)SPCC 16) KEYS : A=UA 

LCKEYS) 

15B GETKEYS: IFCKEY$< "0"ORKEYS> "3") 

ANDKEYS< > CHRSC 13 )THEN158 

160 IFKEYSOCHRSC 13)THENPRINTCHRSC 

145 )SPCC 17) KEYS : A-A*10+UALC KEYS) 

162 I FA< 10RA> ETHEN14B 

164 GETKEYS: IFCKEY$< "0"ORKEY$> "3") 

ANDKEYSO "*"THEN164 

IBB IFKEYS-"»"THEN204 

16B PRINTCHR$C145)SPCC27)KEY$: B-UA 

LC KEYS) 

170 GETKEYS: IFCKEY$< "0"0RKEY$> "9") 

ANDKEYSO CHRSC 13) THEN170 

172 IFKEYSOCHRSC 13)THENPRINTCHR$C 

145)SPCC2B)KEYS: B-B*10+UALCKEYS) 

174 I FB< 10RB> ETHEN146 

17B AS-FTSCA) : FTSC A ) -FTSC B ) : FTSCB) 

=A$ 

17B AS-TSSCA) : TSS C A ) -TSS C B ) : TSSCB) 
-AS 

1B0 AS-NFSCA) :NFSCA)=NFSCB) :NFSCB) 
= A$ 

182 AS-FESCA) : FESC A ) -FES C B ) : FES C B) 
=A$ 

1B4 AS-SKSCA) : SKSC A)-SKSCB) : SKSCB) 
-AS 

186 PRINTCHRSC145)SPCC11) "ANOTHER 
ENTRY Y/N?" ; 

188 GETKEYS: IFKEYSO "Y"ANDKEYSO "N 
"THEN1BB 
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Program Listing (conl.) 



190 IFKEY$="Y"THEN13B 
192 G0T0204 

194 PR1NTGHRSC 1H5>SPCC7) "TOO HANY 
FILES FDR nANUAL":FORX-lT02000;NEX 
T 

196 G0T0252 
198 : 

800 REM •»»»*»•**•»*•»•»»• WRITE D 
I RECTORY ENTRIES »*«»»*«»*••*»»»*» 

202 : 

204 PRINTCHRSC147V , UIRITING ... : " 
IDS: PRINT 

206 2$=CHR$C0)+CHRSC255) 
20B S-l: N-l 

210 PRINT** 15, "Ul: "2;0iT;S:6DSUB262 

212 BP=2 

214 IFN>EG0T0230 

216 IFBP<256G0T0222 

218 PRINT1*15, "U2: "2 ; 0 ; T ; S : G05UB262 

220 S=S*CS) : G0T0210 

222 PR INT#15 , "B-P : " ; 2 ; BP 

224 PRINTSPCC 145NFSCN V : "TSCASCC 

FTSCN35-12B3 

226 PRINTW2, FTSCN) ; TSSCN) ; NFSCN) ; F 
ESCN) ; 

228 BP=BP+32:N-N+1:G0T0214 

230 IFBP>255GDT023B 

232 PRINTK15, "B-P: ";2;BP 

234 PRINT#2,Z0S; 

236 BP=BP+32:G0T0230 

238 BP-0:PRINT#15, "B-P: ";2;BP 

240 PRINT#2,ZS; 

242 PR I NT** 15, "U2: "2 ; D ; T ; S : G0SUB2G2 

244 ZS-LEFT$CZOS,23 

246 S-S::CSD : IFS-255GDTD252 

24B PRINT**15, "Ul : " ; 2 ; 0; T ; S : G05UB26 

2 

250 BP=2:G0T0232 

252 F0RX-1T01000 : NEXT : CL0SE2 : CLDSE 
15 

254 PRINTCHRSC 147) : F0RT=1T011 : PR IN 
T : NEXT : PR I NTSPCC 1 1 ) "ANOTHER DISK 
Y/N? " 

256 GETKEYS: IFKEYSO "Y"ANDKEYSO "N 
"THEN256 

258 IFKEY£-"Y"THENRUN 

260 P0KE532B0, 14: PRINTCHRSC 147 3CHR 

$( 154) : END 

262 : 

264 REfl »••»•»•••*•••»••» INPUT ER 
ROR CHANNEL STATUS *»»*♦*»»•»••*•* 

266 : 

26B INPUT**15,EN,En$,ET,ES ; I FEN-OTH 
ENRETURN 



270 PRINTCHRSC147r , DISK ERRDR "EN; 

EriS;ET;ES:G0T0252 

272 : 

274 REM •*»*•«•*»•*•***»* GET CHAR 
ACTERS FROfl BUF . »*«»•*»**•*•****» 

276 : 

278 ZS=" n 

280 FDRI-1T0N:GQSUB290 
2B2 ZS-ZS+AS: NEXT: RETURN 
2B4 : 

2B6 RED •»«*»*•**•»*»**»**«*• INPU 
T FROd BUFFER ••*•*»*»»»*••••••»*» 

2B8 : 

290 GET**2,A$: I FA$= " "THENAS-CHRS CO) 
292 A-ASCCAS) : BP-BP+1 : RETURN 

294 : 

296 REn »»•»**»*»»•*»»»***** GET 0 
K TD CONTINUE ***•*•****•********• 

298 : 

300 PRINTSPCCB)CHR$C11)"0K TO CONT 

INUE Y/N? " 

302 GETKEYS: I FZS- "N"GQTD252 

304 IFKEYSO "Y"G0T0302 

306 RETURN 

30B : 

310 : 

318 •***«.•.•«•»•••••*.••*•••••.*• 

314 * 

316 * DISK DIRECTORY ORD 
ERLY FOR COfinODORE 64 * 

317 * 

318 * SWAP ANY 2 DIRECTD 
RY ENTRIES AT A TIME » 
318 » HAXiriUn NUMBER OF 
ENTRIES ALLDUIED : - 44 * 

320 » 

* 

321 * LES ALLAN 

19.01.B5 * 

322 * 

* 

*****•*•*•»*•<»•*»*•******«*•»• 




HARDWARE 



COMMODORE C16 

OUAL CASSETTE INTERFACE 
Transfer any C16 cassette program, 
turbos, m/code elc to a second 
dataselle 

interface I (or C16 and *«■ £11.ft5 inc 
PSP Interface II lor C16. -«. CBM 64 

and Vic ro £14.95 inc P&P 
Joysitclt Interlace, connects any 

(oystick lo C18: £3.95 mc P&P 
Cassette Interface, connects any C2N 
casseile to C16 £3.25 inc P&P 
Cheques/POs lo: 

J. FITZPATRICK (YC), 
1 Alveley Ave, Withington, 
Manchester M20 9UD. 






£OI457q699. 



SOFTWARE 
GAMES 



CBM 64 

Soccer Supremo, soccer management 
game (HCW •••••> Pirate Island. 
Doard game simulation (MCW ••*•*[; 
Cricket. II mi led over test match (HCW 
•••*) £4.99 each 2 for £8 99 or 3 for 
£12 50 on casctte Add £2 50 to total for 
disc 

Fiom: Dromeda Software. 56 Welts 
Street. Haslmgoon. Lancashire, 
BB4 5LS. 



Super Breaker 
Back-Up Board 

For trie COMMODORE 64 and VIC-30 
When a second CBM type casittte unit 
is connected lo the board It will make 
security back-up copies ol cassette 
based soltware, including TurboVFast 
Loaders, Basic and/or Machine Code 
and Data Files. No additional software 
ii needed. Very User Friendly, the 
back-up copy Is made on the second 
cassette while Ihe original is laodlng on 
the first. Price al £1.95 plus 55p for pap 
UK (Europe add (i.oo. elsewhere add 
£2.00). Send cheque/postal order, or a 

stamp for details, lo: 
C. Kent, 20 Northcape Walk, 
Corby, Northants. 

For enquiries telephone (0536) 742622 

be I woe n 3pm and 5pm. Monday to Friday 



DON'T BE AN 
ALIEN 
TO INVADE THIS 
SPACE 
RING 
01 437 0699 



ACCOUNTS 
SOFTWARE 



CASH TRADERS' 
BOOK KEEPING 

Purchase Day Book. 
Daily Takings. 
VAT Return (A.B,C,D.F r . 
Bank Statement 
Petty Cash Statement 
i Haling ot up to 99 nominal a/cs 
19 accounls lor creditor control 

Final Accounts 
£199.00 (Inc VAT and postage) 
Demonstration Pack; £11.50 
(refundable against purchase) 
CASH WITH ORDER TO: 

Ret: YC, Quick-Count Ltd., 
15 Neeld Cres., London 
NW4 3RP. 01-202 5486 

(arts mc.) 



YOUR COMMODORE — CLASSIFIED ADVERTISEMENT - ORDER FORM 



Advertise nationally in these 
columns for only 40p per word (min 
charge 15 words). Simply print your 
message in the coupon and send 
with your cheque or postal order 
made payable to Argus Specialist 
Publications Ltd to: 

CLASSIFIED DEPARTMENT 
YOUR COMMODORE 
No 1 Golden Square, London W1 
Tel: 01-437 0699 



Name 



Address 



ADVERTISERS PLEASE ADD 15% VAT 



Tel no (day) 



Please place my advert in YOUR COMMODORE for issues. 

Please indicate no. of insertions required. 



YOUR COMMODORE 



Lineage: 40p per word. ES iiaS 

Semi display: C9.00 per single column centimetre 
Ring for information on series bookings/discounts. 

AM advertisements in this section must tie prepaid 
Advertisements are accepted subject to the terms and conditions 
printed on the advertisement rate card (available on request). 



01-437 0699 

EXT. 322 

Send your requirements to: 
DAVID HORNE 

ASP LTD, 1 GOLDEN SQUARE. 
LONDON W1 



SOFTWARE 



FOR SALE 



FOR HIRE 



VIC-20 USERS 

A renumber lacilily (or your 
basic programs requiring no 
memory expansion Cassette 
£2.00 including post and 
package 
Dept 1, Boiling Software, 

PO Box 42, Bradford, 
West Yorkshire. BD4 7UD. 



ADDRESS BOOK CBM 64 

This in if Iriendly fully menu diinrfi 
program it ideal 'or keeping law o" 
aOd'BiSM. telephone numbers, birthdays, 
etuti memobars ale. Produce, Christmas 
ca/d'Binnday Cub Hals etc with multiple 
printout options Atio compatible with' 
15J0 p/ploitw Only £0.90 Incl From: 
FINSOFT, 7 Barlow Road. 

Wllmslow, Cheshire SK9 4BE. 




...and friends!! 



VOLUMES C64\ 
AfID TWO \ ^ 

cof%tH 



GRAND PRIX CBM 64 A program 
to call up and view Grand Prix 
results and automatically update 
driver and construct championship 
tables Data tape included with 
latest results entered for 1985. 
C4 85. From J. Hudson, 32 
Garrison Lane. Chessingion, 
Surrey KT9 2LB. 



FOR SALE 



GADGET 64 £5.95 

This 100% machino code CBM64 
cassette utility offers. Append. 
Delete, Renumber (including 
Goto. Gosub, etc.) Satislytngly 
simple to use. Send your Name, 
Address & P/O or Cheque for 
£5.95 (P&P Free) to: 
J&J GILMOUR LTO, 
Oept YC985. 4 Copse Close. Liss. 
Hampshire, GU33 7EW. England. 
Tel: 0730-893430. 



CBM 64 quality colour monitor 
style T.V. complete system* 
including good software library lor 
sale E350.O0 ON.O. Ring Bentley 
(0420, 23565 (Hants) 'Tape 
based. 



tVIC-20! with cassette, console, 
switchboard. RAM-pack. 75 
games plus books tor £250 
inclusive. Ring 552-8512 lor 
details. 




SOFTWARE 
APPLICATIONS 



HOME ACCOUNTS. Pul your 
house in order! Probably home 
computing's best use! Compre- 
hensive coverage of bank 
accounts. Credit cards. HP inbuilt 
accuracy check. Records all 
transactions Projects cashflow lor 
any period ahead. Available lor 
C.16 CBM64 or VIC-20. £8.45 or 
free details from Discus 
Software, Freepost. Windmill 
Hill. Brixham T05 9BR. Tele- 
phone 08045 55532. 



COMMODORE 
C16 

CASSETTE HIRE 

AT LAST! All the top games 
available tor the C16 can now be 
hired from: 

DABSOFT 

Library constantly updated as new 
games become available Membership 
tee of £6.50 Includes 2 FREE rentals' 

OVER 50 TITLES 
One price 'or any game Charge of 

£1.25 mc P&P BOTH WAYS 
For complete memebersmp tut post 
cheque or postal order to 

DABSOFT (YC) 

39 Guildford Road, Levenahulme 
M19 3FG. Tel: 081 445 4375. 



COMMODORE 64 cassette 
library. Hire laiesl games and 
educational software, only one 
price £1.50 per cassette 7 days 
hire. Details S A E. pleae:CCL, 1 9 
Darrell Way. Abingdon, OX1 4 I HQ. 



VIC-20 AND CMB-64 
SOFTWARE HIRE 

300 titles. Free membership Send 
2 ■ 17p stamps tor your hireKit to: 
VIC-20 SOFTWARE HIRE (Y.M.), 
8 Thurlend Street. Nottingham. 

PLEASE STATE MACHINE 



Attention! Commodore 
Users. 

THERE'S A WHOLE 
LIBRARY OF 
SOFTWARE FOR YOU 

AT THE MIDLAND 
COrVyyTre.UBRARY. 
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REPAIRS 

by the Arcade Experts to Atari. 
VIc 20, Commodore 64. Spectrum 
ZX81, TRSB0. Dragon, T199/4A, 
BBC, plus associated peripherals 

We charge a low hourly rate and 
many repairs cost as little as 
£5.00 with a maximum ot £23.00 
mc ot VAT. P&P and insurance. 
3 months guarantee parts and 

labour; 24hr turnround. 

SEND NO MONEY NOW 
Just your faulty unit with 

description of condition. 

ZILEC ELEXTRONICS LTO, 
Unit 8, Trent Industrie! Estate.. 
Welmore Road, Burlon upon Trent, 
Slattordshire. 
■r*j Telephone Burton 10283) 33535. 2 



COMMODORE REPAIRS 

Commodore repairs by Commoaore 
approved engineer Repair prion; 
Vic 20 ■ ■ i..' . O.0S Vic 20 £15 00. 
CBM 6* from £20.00. C2N from ES.00. 1541 
from £20.00, C64 p*u £1330. Spectrum 
CIS 50. Oregon £33.00 Electron!. Atari 
For TiCG inlormotion SAE or tut np hone 

G.C. BUNCE & SON, 
36 Burlington Road, Burnham, 
Bucks SL1 7BQ. 
Tel: (062B6) 61696. 



COMPUTER REPAIRS 

IN SOUTHEND 

CBM 84. Vic 20. Spectrum, 
BBC. Electron 

MINNIE MICRO ELECTRONICS 
12 Eastern Esplanade, Southend. 
Tel: 0702 62033/615809 
Open 7 day* ■ week 



FOR SALE 



MOONRAKER 
C9M 64 Space Gome leaturet last 

• My-into Rolling Radar Display 

■ intra Hm rargel Screen 
Altitude. Time. Score, Indicators. 
Fuel/Purchase Option. Promotion. 
Send your name, address 4 "O cr>wuc to 
JAJ Gilmour Ltd., Dept YC98S, 
4 Copse Close, List, Hampshire 
GU33 7EN, England GU33 7EN. 
Tel: 0730-H93430 
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Wizard Computer Games, 
Alpha House, 10 Carver Street,' 
Sheffield SI 4FS. Telephone: (0742) 752912 



eet^ 



William Wbbbler is the latest 
game from Tony Crowther- 
a most exciting adventure 
game. Through the 
underworld of dark 
powers in search of 
golden treasure William 
struggles against all odds 
to vanquish foes and reach his goal. 
A game of skill and excitement. 



Choosing the right computer 
is a good start — but can you 
find the right software? 
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At SUPERSOFT we're very conscious of the 
fact that people who spend several hundred 
pounds on computer equipment are looking 
to do rather more than play Space Invaders. 

Financial planning is a rather grand name 
for something you've been doing all your life 
— making ends meet! Perhaps if Mr 
Micawber had used BUSICALC he would 
have been able to balance the books a little 
better. 

For home, club or small business use 
BUSICALC 1 should pay for itself in no time at 
all; for larger companies we recommend 
BUSICALC 3. one of the few really valuable 
programs that you can learn to use in a day. 

Although your Commodore 64 is a power- 
ful musical instrument you need to be a 
pretty good programmer to understand how 
it all works. Unless, of course, you buy MUSIC 
MASTER! 

To use MUSIC MASTER requires no prior 
musical knowledge, though in the hands of 
an experienced musician it will prove an 
invaluable tool. You don't need to know the 
first thing about programming either! MUSIC 
MASTER is the musical equivalent of a word 
processor, remembering the notes you play 
and allowing you to replay and edit them as 
you wish. 




INTERDICTOR PILOT is a space flight 
simulator. Nowadays simulators are widely 
used to train pilots and astronauts because - 
to be frank - it's a lot cheaper (and safer) 
than the real thing! 

Imagine, if you will, life in the 22nd 
century: space travel is commonplace, and 
on the outskirts of the galaxy the first war 
between civilizations is being fought. A short- 
age of trained pilots has prompted the Feder- 
ation to develop a computer simulation that 
allows raw recruits to gain experience with- 
out paying for their mistakes with their lives, 
With the aid of your Commodore 64 you too 
can learn to pilot the Interdictor Mk 3 craft. 
But be warned - this is no game! 




SUPERSOFT, Winchester House, Canning Road, 
Wealdstone, Harrow, Middlesex HA3 7SJ 
Telephone: 01-861 1166 



Other SUPERSOFT products include the 
MIKRO ASSEMBLER cartridge, the only 
assembler that's ideal for beginners yet pow- 
erful enough for the professional (most of 
our competitors use it!). The VICTREE cart- 
ridge adds dozens of commands to Basic 
including toolkit aids and disk commands; or 
on disk there's MASTER 64, a really com- 
prehensive package for the keen prog- 
rammer. 

Of course, we do also publish games 
programs, and with classics like STIX, QUINX 
and KAMI-KAZE in our range we are one of 
the market leaders. But we most enjoy 
coming up with the sort of programs that are 
going to be in use for months and years, not 
hours and days - the sort of programs that 
make you glad that you bought a computer - 
and glad that you bought SUPERSOFT! 

You won't find SUPERSOFT products on 
the shelves of your local supermarket. But 
most specialist shops stock titles from our 
extensive range {and are prepared to obtain 
other programs to order). However you can 
also buy direct by sending a cheque (pre-paid 
orders are post free!), by calling at our 
offices, or over the telephone using your 
ACCESS card. 



